/* ************************************************************************** description -------------------- copyright : (C) 2000-2003 by Andreas Zehender email : zehender@kde.org ************************************************************************** ************************************************************************** * * * 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 2 of the License, or * * (at your option) any later version. * * * **************************************************************************/ #include "pmpovrayparser.h" #include <klocale.h> #include <tqvaluelist.h> #include "pmpart.h" #include "pmscanner.h" #include "pmtokens.h" #include "pmcolor.h" #include "pmallobjects.h" #include "pmprototypemanager.h" #include "pmxmlhelper.h" PMPovrayParser::PMPovrayParser( PMPart* part, TQIODevice* dev ) : PMParser( part, dev ) { init( ); } PMPovrayParser::PMPovrayParser( PMPart* part, const TQByteArray& array ) : PMParser( part, array ) { init( ); } PMPovrayParser::~PMPovrayParser( ) { if( m_pScanner ) delete m_pScanner; } void PMPovrayParser::init( ) { m_pScanner = new PMScanner( m_pDevice ); m_consumedTokens = 0; m_skippedComments.setAutoDelete( true ); m_bLastPMCommentEmpty = true; } void PMPovrayParser::nextToken( ) { m_token = m_pScanner->nextToken( ); m_consumedTokens++; setCurrentLine( m_pScanner->currentLine( ) ); if( ( m_token == SCANNER_ERROR_TOK ) || ( m_token == COMMENT_TOK ) || ( m_token == LINE_COMMENT_TOK ) || ( m_token == PMNAME_TOK ) ) { // create the objects (string) only if necessary PMComment* c; int lastCommentLine = -2; TQString commentText; while( ( m_token == SCANNER_ERROR_TOK ) || ( m_token == COMMENT_TOK ) || ( m_token == LINE_COMMENT_TOK ) || ( m_token == PMNAME_TOK ) ) { switch( m_token ) { case SCANNER_ERROR_TOK: printError( m_pScanner->error( ) ); lastCommentLine = -2; break; case LINE_COMMENT_TOK: commentText = m_pScanner->sValue( ); if( lastCommentLine == ( m_pScanner->currentLine( ) - 1 ) ) { c = m_skippedComments.last( ); if( c ) c->setText( c->text( ) + '\n' + commentText ); else { c = new PMComment( m_pPart, commentText ); m_skippedComments.append( c ); } } else { c = new PMComment( m_pPart, m_pScanner->sValue( ) ); m_skippedComments.append( c ); } lastCommentLine = m_pScanner->currentLine( ); break; case COMMENT_TOK: c = new PMComment( m_pPart, m_pScanner->sValue( ) ); m_skippedComments.append( c ); lastCommentLine = -2; break; case PMNAME_TOK: // Special comment m_lastPMComment = m_pScanner->sValue( ); m_bLastPMCommentEmpty = false; lastCommentLine = -2; break; default: lastCommentLine = -2; break; } m_token = m_pScanner->nextToken( ); m_consumedTokens++; } } } bool PMPovrayParser::isTrue( ) const { if( ( m_token == ON_TOK ) || ( m_token == TRUE_TOK ) || ( m_token == YES_TOK ) ) return true; return false; } bool PMPovrayParser::isFalse( ) const { if( ( m_token == OFF_TOK ) || ( m_token == FALSE_TOK ) || ( m_token == NO_TOK ) ) return true; return false; } void PMPovrayParser::topParse( ) { nextToken( ); do { if( !parseChildObjects( 0 ) ) m_token = EOF_TOK; if( m_token != EOF_TOK ) { printUnexpected( m_pScanner->sValue( ) ); nextToken( ); } } while( m_token != EOF_TOK ); if( errors( ) || warnings( ) ) printMessage( PMMSpecialRawComment ); } bool PMPovrayParser::parseBool( ) { if( isFalse( ) ) { nextToken( ); return false; } if( isTrue( ) ) { nextToken( ); return true; } PMValue v; if( parseNumericExpression( v, true ) ) { switch( v.type( ) ) { case PMVFloat: return v.floatValue( ) > 0.0; break; case PMVVector: return ( v.vector( ) )[0] > 0.0; break; default: printError( i18n( "Boolean expression expected" ) ); break; } } return true; } bool PMPovrayParser::parseChildObjects( PMCompositeObject* parent, int max /* = -1 */ ) { PMObject* child = 0; bool finished = false; bool error = false; bool noChild = false; int numParsed = 0; do { if( !m_bLastPMCommentEmpty && parent ) { if( parent->isA( "NamedObject" ) ) ( ( PMNamedObject* ) parent )->setName( m_lastPMComment ); m_bLastPMCommentEmpty = true; } if( m_skippedComments.count( ) > 0 ) child = m_skippedComments.take( 0 ); else { child = 0; noChild = false; // some objects switch( m_token ) { case UNION_TOK: case DIFFERENCE_TOK: case INTERSECTION_TOK: case MERGE_TOK: child = new PMCSG( m_pPart ); error = !parseCSG( ( PMCSG* ) child ); break; case BOX_TOK: child = new PMBox( m_pPart ); error = !parseBox( ( PMBox* ) child ); break; case SPHERE_TOK: if( ( parent && ( parent->type( ) == "Blob" ) ) || ( !parent && m_pTopParent && ( m_pTopParent->type( ) == "Blob" ) ) ) { child = new PMBlobSphere( m_pPart ); error = !parseBlobSphere( ( PMBlobSphere* ) child ); } else { child = new PMSphere( m_pPart ); error = !parseSphere( ( PMSphere* ) child ); } break; case CYLINDER_TOK: if( ( parent && ( parent->type( ) == "Blob" ) ) || ( !parent && m_pTopParent && ( m_pTopParent->type( ) == "Blob" ) ) ) { child = new PMBlobCylinder( m_pPart ); error = !parseBlobCylinder( ( PMBlobCylinder* ) child ); } else { child = new PMCylinder( m_pPart ); error = !parseCylinder( ( PMCylinder* ) child ); } break; case CONE_TOK: child = new PMCone( m_pPart ); error = !parseCone( ( PMCone* ) child ); break; case TORUS_TOK: child = new PMTorus( m_pPart ); error = !parseTorus( ( PMTorus* ) child ); break; case BLOB_TOK: child = new PMBlob( m_pPart ); error = !parseBlob( ( PMBlob* ) child ); break; case COMPONENT_TOK: child = new PMBlobSphere( m_pPart ); error = !parseBlobComponent( ( PMBlobSphere* ) child ); break; case HEIGHT_FIELD_TOK: child = new PMHeightField( m_pPart ); error = !parseHeightField( ( PMHeightField* ) child ); break; case TEXT_TOK: child = new PMText( m_pPart ); error = !parseText( ( PMText* ) child ); break; case JULIA_FRACTAL_TOK: child = new PMJuliaFractal( m_pPart ); error = !parseJuliaFractal( ( PMJuliaFractal* ) child ); break; case PLANE_TOK: child = new PMPlane( m_pPart ); error = !parsePlane( ( PMPlane* ) child ); break; case TQUADRIC_TOK: case CUBIC_TOK: case TQUARTIC_TOK: case POLY_TOK: child = new PMPolynom( m_pPart ); error = !parsePolynom( ( PMPolynom* ) child ); break; case BICUBIC_PATCH_TOK: child = new PMBicubicPatch( m_pPart ); error = !parseBicubicPatch( ( PMBicubicPatch* ) child ); break; case DISC_TOK: child = new PMDisc( m_pPart ); error = !parseDisc( ( PMDisc* ) child ); break; case TRIANGLE_TOK: case SMOOTH_TRIANGLE_TOK: child = new PMTriangle( m_pPart ); error = !parseTriangle( ( PMTriangle* ) child ); break; case LATHE_TOK: child = new PMLathe( m_pPart ); error = !parseLathe( ( PMLathe* ) child ); break; case PRISM_TOK: child = new PMPrism( m_pPart ); error = !parsePrism( ( PMPrism* ) child ); break; case SOR_TOK: child = new PMSurfaceOfRevolution( m_pPart ); error = !parseSor( ( PMSurfaceOfRevolution* ) child ); break; case SUPERELLIPSOID_TOK: child = new PMSuperquadricEllipsoid( m_pPart ); error = !parseSqe( ( PMSuperquadricEllipsoid* ) child ); break; case CAMERA_TOK: child = new PMCamera( m_pPart ); error = !parseCamera( ( PMCamera* ) child ); break; case LIGHT_SOURCE_TOK: child = new PMLight( m_pPart ); error = !parseLight( ( PMLight* ) child ); break; case LOOKS_LIKE_TOK: child = new PMLooksLike( m_pPart ); error = !parseLooksLike( ( PMLooksLike* ) child ); break; case PROJECTED_THROUGH_TOK: child = new PMProjectedThrough( m_pPart ); error = !parseProjectedThrough( ( PMProjectedThrough* ) child ); break; case TEXTURE_TOK: child = new PMTexture( m_pPart ); error = !parseTexture( ( PMTexture* ) child ); break; case AGATE_TOK: case AVERAGE_TOK: case BOXED_TOK: case BOZO_TOK: case BUMPS_TOK: case CELLS_TOK: case CRACKLE_TOK: case CYLINDRICAL_TOK: case DENTS_TOK: case DENSITY_FILE_TOK: case GRADIENT_TOK: case GRANITE_TOK: case JULIA_TOK: case LEOPARD_TOK: case MAGNET_TOK: case MANDEL_TOK: case MARBLE_TOK: case ONION_TOK: case PLANAR_TOK: case TQUILTED_TOK: case RADIAL_TOK: case RIPPLES_TOK: case SLOPE_TOK: case SPHERICAL_TOK: case SPIRAL1_TOK: case SPIRAL2_TOK: case SPOTTED_TOK: case WOOD_TOK: case WAVES_TOK: case WRINKLES_TOK: child = new PMPattern( m_pPart ); { bool normal = true; if( parent && ( parent->type( ) != "Normal" ) ) normal = false; error = !parsePattern( ( PMPattern* ) child, normal ); } break; case TURBULENCE_TOK: // Search for a PMPattern in the object's tqchildren child = parent->firstChild( ); while( child && !child->isA( "Pattern" ) ) child = child->nextSibling( ); if( child ) { error = !parsePattern( ( PMPattern* ) child ); child = 0; noChild = true; } else { printError( i18n( "Found turbulence without a pattern." ) ); error = true; } break; case FREQUENCY_TOK: case PHASE_TOK: case RAMP_WAVE_TOK: case TRIANGLE_WAVE_TOK: case SINE_WAVE_TOK: case SCALLOP_WAVE_TOK: case CUBIC_WAVE_TOK: case POLY_WAVE_TOK: // Search for a PMBlendMapModifiers in the object's tqchildren child = parent->firstChild( ); while( child && !child->isA( "BlendMapModifiers" ) ) child = child->nextSibling( ); if( child ) { error = !parseBlendMapModifiers( ( PMBlendMapModifiers* ) child ); child = 0; noChild = 0; } else { child = new PMBlendMapModifiers( m_pPart ); error = !parseBlendMapModifiers( ( PMBlendMapModifiers* ) child ); } break; case WARP_TOK: child = new PMWarp( m_pPart ); error = !parseWarp( ( PMWarp* ) child ); break; case PIGMENT_TOK: child = new PMPigment( m_pPart ); error = !parsePigment( ( PMPigment* ) child ); break; case NORMAL_TOK: child = new PMNormal( m_pPart ); error = !parseNormal( ( PMNormal* ) child ); break; case NORMAL_MAP_TOK: child = new PMNormalMap( m_pPart ); error = !parseNormalMap( ( PMNormalMap* ) child ); break; case BUMP_MAP_TOK: child = new PMBumpMap( m_pPart ); error = !parseBumpMap( ( PMBumpMap* ) child ); break; case SLOPE_MAP_TOK: child = new PMSlopeMap( m_pPart ); error = !parseSlopeMap( ( PMSlopeMap* ) child ); break; case DENSITY_MAP_TOK: child = new PMDensityMap( m_pPart ); error = !parseDensityMap( ( PMDensityMap* ) child ); break; case TEXTURE_MAP_TOK: child = new PMTextureMap( m_pPart ); error = !parseTextureMap( ( PMTextureMap* ) child ); break; case MATERIAL_MAP_TOK: child = new PMMaterialMap( m_pPart ); error = !parseMaterialMap( ( PMMaterialMap* ) child ); break; case PIGMENT_MAP_TOK: child = new PMPigmentMap( m_pPart ); error = !parsePigmentMap( ( PMPigmentMap* ) child ); break; case COLOR_MAP_TOK: case COLOUR_MAP_TOK: child = new PMColorMap( m_pPart ); error = !parseColorMap( ( PMColorMap* ) child ); break; case CHECKER_TOK: case HEXAGON_TOK: case BRICK_TOK: { bool normal = false; double depth = 0.0; int expect = 0; PMListPattern::PMListType type = PMListPattern::ListPatternChecker; if( parent && parent->type( ) == "Normal" ) normal = true; else if( m_pTopParent && m_pTopParent->type( ) == "Normal" ) normal = true; switch( m_token ) { case CHECKER_TOK: type = PMListPattern::ListPatternChecker; expect = 2; break; case HEXAGON_TOK: type = PMListPattern::ListPatternHexagon; expect = 3; break; case BRICK_TOK: type = PMListPattern::ListPatternBrick; expect = 2; break; } nextToken( ); if( normal ) { child = new PMNormalList( m_pPart ); if( parseFloat( depth, true ) ) ( ( PMNormalList* ) child )->setDepth( depth ); if( m_token == NORMAL_TOK ) error = !parseNormalList( ( PMNormalList* ) child, expect ); } else { switch( m_token ) { case COLOR_TOK: case COLOUR_TOK: case RGB_TOK: case RGBT_TOK: case RGBF_TOK: case RGBFT_TOK: case RED_TOK: case GREEN_TOK: case BLUE_TOK: case TRANSMIT_TOK: case FILTER_TOK: case ID_TOK: child = new PMColorList( m_pPart ); error = !parseColorList( ( PMColorList* ) child, expect ); break; case PIGMENT_TOK: child = new PMPigmentList( m_pPart ); error = !parsePigmentList( ( PMPigmentList* ) child, expect ); break; case TEXTURE_TOK: child = new PMTextureList( m_pPart ); error = !parseTextureList( ( PMTextureList* ) child, expect ); break; case NORMAL_TOK: child = new PMNormalList( m_pPart ); error = !parseNormalList( ( PMNormalList* ) child, expect ); break; case DENSITY_TOK: child = new PMDensityList( m_pPart ); error = !parseDensityList( ( PMDensityList* ) child, expect ); break; default: printError( i18n( "Invalid list member." ) ); error = true; } } if( child ) { ( ( PMListPattern* ) child )->setListType( type ); int oldConsumed; double num = 0; PMVector vector; do { oldConsumed = m_consumedTokens; switch( m_token ) { case MORTAR_TOK: nextToken( ); if( !parseFloat( num ) ) return false; ( ( PMListPattern* ) child )->setMortar( num ); break; case BRICK_SIZE_TOK: nextToken( ); if( !parseVector( vector ) ) return false; ( ( PMListPattern* ) child )->setBrickSize( vector ); break; default: break; } } while( oldConsumed != m_consumedTokens ); } break; } case IMAGE_MAP_TOK: child = new PMImageMap( m_pPart ); error = !parseImageMap( ( PMImageMap* ) child ); break; case FINISH_TOK: child = new PMFinish( m_pPart ); error = !parseFinish( ( PMFinish* ) child ); break; case INTERIOR_TOK: child = new PMInterior( m_pPart ); error = !parseInterior( ( PMInterior* ) child ); break; case MEDIA_TOK: child = new PMMedia( m_pPart ); error = !parseMedia( ( PMMedia* ) child ); break; case DENSITY_TOK: child = new PMDensity( m_pPart ); error = !parseDensity( ( PMDensity* ) child ); break; case MATERIAL_TOK: child = new PMMaterial( m_pPart ); error = !parseMaterial( ( PMMaterial* ) child ); break; case SKY_SPHERE_TOK: child = new PMSkySphere( m_pPart ); error = !parseSkySphere( ( PMSkySphere* ) child ); break; case RAINBOW_TOK: child = new PMRainbow( m_pPart ); error = !parseRainbow( ( PMRainbow* ) child ); break; case FOG_TOK: child = new PMFog( m_pPart ); error = !parseFog( ( PMFog* ) child ); break; case GLOBAL_SETTINGS_TOK: child = new PMGlobalSettings( m_pPart ); error = !parseGlobalSettings( ( PMGlobalSettings* ) child ); break; case SCALE_TOK: child = new PMScale( m_pPart ); error = !parseScale( ( PMScale* ) child ); break; case ROTATE_TOK: child = new PMRotate( m_pPart ); error = !parseRotate( ( PMRotate* ) child ); break; case TRANSLATE_TOK: child = new PMTranslate( m_pPart ); error = !parseTranslate( ( PMTranslate* ) child ); break; case MATRIX_TOK: child = new PMPovrayMatrix( m_pPart ); error = !parseMatrix( ( PMPovrayMatrix* ) child ); break; case BOUNDED_BY_TOK: if( parent && ( parent->type( ) == "ClippedBy" ) ) finished = true; else { child = new PMBoundedBy( m_pPart ); error = !parseBoundedBy( ( PMBoundedBy* ) child ); } break; case CLIPPED_BY_TOK: if( parent && ( parent->type( ) == "BoundedBy" ) ) finished = true; else { child = new PMClippedBy( m_pPart ); error = !parseClippedBy( ( PMClippedBy* ) child ); } break; case ISOSURFACE_TOK: child = new PMIsoSurface( m_pPart ); error = !parseIsoSurface( ( PMIsoSurface* ) child ); break; case RADIOSITY_TOK: child = new PMRadiosity( m_pPart ); error = !parseRadiosity( ( PMRadiosity* ) child ); break; case PHOTONS_TOK: if ( parent && ( parent->type( ) == "GlobalSettings" ) ) { child = new PMGlobalPhotons( m_pPart ); error = !parseGlobalPhotons( ( PMGlobalPhotons* ) child ); } else { child = new PMPhotons( m_pPart ); error =!parsePhotons( ( PMPhotons* ) child ); } break; case LIGHT_GROUP_TOK: child = new PMLightGroup( m_pPart ); error = !parseLightGroup( ( PMLightGroup* ) child ); break; case INTERIOR_TEXTURE_TOK: child = new PMInteriorTexture( m_pPart ); error = !parseInteriorTexture( ( PMInteriorTexture* ) child ); break; case SPHERE_SWEEP_TOK: child = new PMSphereSweep( m_pPart ); error = !parseSphereSweep( ( PMSphereSweep* ) child ); break; case MESH_TOK: child = new PMMesh( m_pPart ); error = !parseMesh( ( PMMesh* ) child ); break; case DECLARE_TOK: nextToken( ); if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); nextToken( ); if( !parseToken( '=' ) ) error = true; else { PMValue v; switch( m_token ) { case OBJECT_TOK: // finite solid case BLOB_TOK: case BOX_TOK: case CONE_TOK: case CYLINDER_TOK: case HEIGHT_FIELD_TOK: case JULIA_FRACTAL_TOK: case LATHE_TOK: case PRISM_TOK: case SPHERE_TOK: case SUPERELLIPSOID_TOK: case SOR_TOK: case TEXT_TOK: case TORUS_TOK: case ISOSURFACE_TOK: case SPHERE_SWEEP_TOK: // finite patch case BICUBIC_PATCH_TOK: case DISC_TOK: case MESH_TOK: case POLYGON_TOK: case TRIANGLE_TOK: case SMOOTH_TRIANGLE_TOK: // infinite solid case PLANE_TOK: case TQUADRIC_TOK: case CUBIC_TOK: case TQUARTIC_TOK: case POLY_TOK: // csg case UNION_TOK: case INTERSECTION_TOK: case DIFFERENCE_TOK: case MERGE_TOK: // textures case TEXTURE_TOK: case INTERIOR_TEXTURE_TOK: case PIGMENT_TOK: case NORMAL_TOK: case FINISH_TOK: case TEXTURE_MAP_TOK: case PIGMENT_MAP_TOK: case COLOR_MAP_TOK: case COLOUR_MAP_TOK: case NORMAL_MAP_TOK: case SLOPE_MAP_TOK: case DENSITY_MAP_TOK: case INTERIOR_TOK: case MEDIA_TOK: case DENSITY_TOK: case MATERIAL_TOK: case SKY_SPHERE_TOK: case RAINBOW_TOK: case FOG_TOK: // misc case LIGHT_SOURCE_TOK: case LIGHT_GROUP_TOK: child = new PMDeclare( m_pPart ); error = !parseDeclare( ( PMDeclare* ) child ); break; default: // constant, vector or color declare? if( parseNumericExpression( v ) ) { checkID( id, v ); noChild = true; } else error = true; break; } } if( child ) if( child->isA( "Declare" ) ) ( ( PMDeclare* ) child )->setID( id ); if( m_token == ';' ) nextToken( ); } else printExpected( i18n( "identifier" ), m_pScanner->sValue( ) ); break; case OBJECT_TOK: error = !parseObject( parent ); noChild = true; break; case RAW_POVRAY_TOK: child = new PMRaw( m_pPart, m_pScanner->sValue( ) ); error = false; nextToken( ); break; default: finished = true; break; } } if( !finished && !child && !noChild ) error = true; if( child ) { if( !insertChild( child, parent ) ) { delete child; child = 0; } else if( child->isA( "Declare" ) ) checkID( ( PMDeclare* ) child ); numParsed ++; if( ( max > 0 ) && ( numParsed >= max ) ) finished = true; } } while( !finished && !error ); return finished; } bool PMPovrayParser::parseToken( int t, const TQString& tokenName ) { if( t == ',' ) { // do not require commas any more. if( m_token == ',' ) nextToken( ); return true; } else if( m_token == t ) { nextToken( ); return true; } if( tokenName.isNull() ) printExpected( ( char ) t, m_pScanner->sValue( ) ); else printExpected( tokenName, m_pScanner->sValue( ) ); return false; } bool PMPovrayParser::parseNumericItem( PMValue& v, bool checkForBool /*=false*/ ) { bool finishColor = false; PMVector cv( 0 ); PMVector vec( 0 ); PMValue hv; PMSymbol* s; int i; switch( m_token ) { case X_TOK: v.setVector( PMVector( 1.0, 0.0, 0.0 ) ); nextToken( ); break; case Y_TOK: v.setVector( PMVector( 0.0, 1.0, 0.0 ) ); nextToken( ); break; case Z_TOK: v.setVector( PMVector( 0.0, 0.0, 1.0 ) ); nextToken( ); break; case T_TOK: v.setVector( PMVector( 0.0, 0.0, 0.0, 1.0 ) ); nextToken( ); break; case U_TOK: v.setVector( PMVector( 1.0, 0.0 ) ); nextToken( ); break; case V_TOK: v.setVector( PMVector( 0.0, 1.0 ) ); nextToken( ); break; case PI_TOK: v.setFloat( 3.1415926535897932384626 ); nextToken( ); break; case CLOCK_TOK: printMessage( PMMClockDefault ); v.setFloat( 0.0 ); break; case CLOCK_DELTA_TOK: printMessage( PMMClockDeltaDefault ); v.setFloat( 1.0 ); break; case FLOAT_TOK: v.setFloat( m_pScanner->fValue( ) ); nextToken( ); break; case INTEGER_TOK: v.setFloat( ( double ) m_pScanner->iValue( ) ); nextToken( ); break; case ON_TOK: case TRUE_TOK: case YES_TOK: v.setFloat( 1.0 ); nextToken( ); break; case OFF_TOK: case FALSE_TOK: case NO_TOK: v.setFloat( 0.0 ); nextToken( ); break; case '(': nextToken( ); if( !parseNumericExpression( v ) ) return false; if( !parseToken( ')' ) ) return false; break; case '-': nextToken( ); if( !parseNumericItem( v ) ) return false; if( v.type( ) == PMVFloat ) v.setFloat( -v.floatValue( ) ); else v.setVector( -v.vector( ) ); break; case '+': nextToken( ); if( !parseNumericItem( v ) ) return false; break; case '<': if( !parseVectorLiteral( vec ) ) return false; v.setVector( vec ); break; case COLOR_TOK: case COLOUR_TOK: nextToken( ); case RGB_TOK: case RGBT_TOK: case RGBF_TOK: case RGBFT_TOK: case RED_TOK: case GREEN_TOK: case BLUE_TOK: case TRANSMIT_TOK: case FILTER_TOK: cv.resize( 5 ); cv = 0.0; finishColor = true; break; case ID_TOK: s = getSymbol( m_pScanner->sValue( ) ); if( s ) { nextToken( ); if( s->type( ) == PMSymbol::Value ) v = s->value( ); else { printError( i18n( "Float, color or vector identifier expected." ) ); return false; } } else { printError( i18n( "Undefined identifier \"%1\"." ) .tqarg( m_pScanner->sValue( ) ) ); nextToken( ); } break; default: if( !checkForBool ) printUnexpected( m_pScanner->sValue( ) ); return false; break; } if( !finishColor ) { if( m_token == '.' ) { int index = -1; nextToken( ); switch( m_token ) { case X_TOK: case RED_TOK: case U_TOK: index = 0; break; case Y_TOK: case GREEN_TOK: case V_TOK: index = 1; break; case Z_TOK: case BLUE_TOK: index = 2; break; case T_TOK: case FILTER_TOK: index = 3; break; case TRANSMIT_TOK: index = 4; break; default: break; } if( index >= 0 ) { nextToken( ); if( v.type( ) == PMVFloat ) { if( index != 0 ) index = -1; } else { PMVector vec; if( v.type( ) == PMVVector ) vec = v.vector( ); else vec = v.color( ); if( ( ( unsigned ) index ) < vec.size( ) ) v.setFloat( vec[index] ); else index = -1; } } if( index == -1 ) { printError( i18n( "Bad operands for period operator." ) ); return false; } } } while( finishColor ) { switch( m_token ) { case RGB_TOK: nextToken( ); if( !parseNumericExpression( hv ) ) return false; switch( hv.type( ) ) { case PMVFloat: cv[0] = hv.floatValue( ); cv[1] = hv.floatValue( ); cv[2] = hv.floatValue( ); break; case PMVVector: vec = hv.vector( ); vec.resize( 3 ); cv[0] = vec[0]; cv[1] = vec[1]; cv[2] = vec[2]; break; default: printError( i18n( "Float or vector expression expected" ) ); break; } break; case RGBT_TOK: nextToken( ); if( !parseNumericExpression( hv ) ) return false; switch( hv.type( ) ) { case PMVFloat: cv[0] = hv.floatValue( ); cv[1] = hv.floatValue( ); cv[2] = hv.floatValue( ); cv[4] = hv.floatValue( ); break; case PMVVector: vec = hv.vector( ); vec.resize( 4 ); cv[0] = vec[0]; cv[1] = vec[1]; cv[2] = vec[2]; cv[4] = vec[3]; break; default: printError( i18n( "Float or vector expression expected" ) ); break; } break; case RGBF_TOK: nextToken( ); if( !parseNumericExpression( hv ) ) return false; switch( hv.type( ) ) { case PMVFloat: cv[0] = hv.floatValue( ); cv[1] = hv.floatValue( ); cv[2] = hv.floatValue( ); cv[3] = hv.floatValue( ); break; case PMVVector: vec = hv.vector( ); vec.resize( 4 ); cv[0] = vec[0]; cv[1] = vec[1]; cv[2] = vec[2]; cv[3] = vec[3]; break; default: printError( i18n( "Float or vector expression expected" ) ); break; } break; case RGBFT_TOK: nextToken( ); if( !parseNumericExpression( hv ) ) return false; switch( hv.type( ) ) { case PMVFloat: cv = hv.floatValue( ); break; case PMVVector: vec = hv.vector( ); vec.resize( 5 ); cv = vec; break; default: printError( i18n( "Float or vector expression expected" ) ); break; } break; case RED_TOK: nextToken( ); parseNumericExpression( hv ); if( hv.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); break; } cv[0] = hv.floatValue( ); break; case GREEN_TOK: nextToken( ); parseNumericExpression( hv ); if( hv.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); break; } cv[1] = hv.floatValue( ); break; case BLUE_TOK: nextToken( ); parseNumericExpression( hv ); if( hv.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); break; } cv[2] = hv.floatValue( ); break; case FILTER_TOK: case ALPHA_TOK: nextToken( ); parseNumericExpression( hv ); if( hv.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); break; } cv[3] = hv.floatValue( ); break; case TRANSMIT_TOK: nextToken( ); parseNumericExpression( hv ); if( hv.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); break; } cv[4] = hv.floatValue( ); break; case ID_TOK: if( parseNumericItem( hv ) ) { if( hv.type( ) == PMVFloat ) { for( i = 0; i < 5; i++ ) cv[i] = hv.floatValue( ); } else if( hv.type( ) == PMVVector ) { cv = hv.vector( ); cv.resize( 5 ); } else cv = hv.color( ); } break; default: finishColor = false; v.setColor( cv ); break; } } return true; } bool PMPovrayParser::parseVectorLiteral( PMVector& p ) { PMValue v; if( !parseToken( '<' ) ) return false; if( !parseNumericExpression( v ) ) return false; if( v.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); return false; } p.resize( 1 ); p[0] = v.floatValue( ); while( m_token != '>' ) { // many old scenes do not use a comma between values if( m_token == ',' ) nextToken( ); // parseToken( ',' ); if( !parseNumericExpression( v ) ) return false; if( v.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); return false; } p.resize( p.size( ) + 1 ); p[p.size( ) - 1] = v.floatValue( ); } /** old code while( m_token == ',' ) { nextToken( ); if( !parseNumericExpression( v ) ) return false; if( v.type( ) != PMVFloat ) { printError( i18n( "Float expression expected" ) ); return false; } p.resize( p.size( ) + 1 ); p[p.size( ) - 1] = v.floatValue( ); } */ if( !parseToken( '>' ) ) return false; return true; } bool PMPovrayParser::parseNumericExpression( PMValue& v, bool checkForBool /*=false*/ ) { bool end = false; PMValue v2; PMVector hv( 0 ); if( !parseNumericItem( v, checkForBool ) ) return false; do { switch( m_token ) { case '*': nextToken( ); if( !parseNumericItem( v2 ) ) break; switch( v.type( ) ) { case PMVFloat: switch( v2.type( ) ) { case PMVFloat: v.setFloat( v.floatValue( ) * v2.floatValue( ) ); break; case PMVVector: v.setVector( v2.vector( ) * v.floatValue( ) ); break; case PMVColor: v.setColor( v2.color( ) * v.floatValue( ) ); break; } break; case PMVVector: switch( v2.type( ) ) { case PMVFloat: v.setVector( v.vector( ) * v2.floatValue( ) ); break; case PMVVector: v.setVector( v.vector( ) * v2.vector( ) ); break; case PMVColor: if( v.vector( ).size( ) == 5 ) v.setColor( v.vector( ) * v2.color( ) ); else printError( i18n( "You can't multiply a vector with a color" ) ); break; } break; case PMVColor: switch( v2.type( ) ) { case PMVFloat: v.setColor( v.color( ) * v2.floatValue( ) ); break; case PMVVector: if( v2.vector( ).size( ) == 5 ) v.setColor( v2.vector( ) * v.color( ) ); else printError( i18n( "You can't multiply a vector with a color" ) ); break; case PMVColor: v.setColor( v.color( ) * v2.color( ) ); break; } break; } break; case '/': nextToken( ); if( !parseNumericItem( v2 ) ) break; switch( v.type( ) ) { case PMVFloat: switch( v2.type( ) ) { case PMVFloat: v.setFloat( v.floatValue( ) / v2.floatValue( ) ); break; case PMVVector: hv.resize( v2.vector( ).size( ) ); hv = v.floatValue( ); v.setVector( hv / v2.vector( ) ); break; case PMVColor: hv.resize( 5 ); hv = v.floatValue( ); v.setColor( hv / v.floatValue( ) ); break; } break; case PMVVector: switch( v2.type( ) ) { case PMVFloat: v.setVector( v.vector( ) / v2.floatValue( ) ); break; case PMVVector: v.setVector( v.vector( ) / v2.vector( ) ); break; case PMVColor: if( v.vector( ).size( ) == 5 ) v.setColor( v.vector( ) / v2.color( ) ); else printError( i18n( "You can't divide a vector by a color" ) ); break; } break; case PMVColor: switch( v2.type( ) ) { case PMVFloat: v.setColor( v.color( ) / v2.floatValue( ) ); break; case PMVVector: if( v2.vector( ).size( ) == 5 ) v.setColor( v2.vector( ) / v.color( ) ); else printError( i18n( "You can't divide a color by a vector" ) ); break; case PMVColor: v.setColor( v.color( ) / v2.color( ) ); break; } break; } break; case '+': nextToken( ); if( !parseNumericExpression( v2 ) ) break; switch( v.type( ) ) { case PMVFloat: switch( v2.type( ) ) { case PMVFloat: v.setFloat( v.floatValue( ) + v2.floatValue( ) ); break; case PMVVector: v.setVector( v2.vector( ) + v.floatValue( ) ); break; case PMVColor: v.setColor( v2.color( ) + v.floatValue( ) ); break; } break; case PMVVector: switch( v2.type( ) ) { case PMVFloat: v.setVector( v.vector( ) + v2.floatValue( ) ); break; case PMVVector: v.setVector( v.vector( ) + v2.vector( ) ); break; case PMVColor: if( v.vector( ).size( ) == 5 ) v.setColor( v.vector( ) + v2.color( ) ); else printError( i18n( "You can't add a vector and a color" ) ); break; } break; case PMVColor: switch( v2.type( ) ) { case PMVFloat: v.setColor( v.color( ) + v2.floatValue( ) ); break; case PMVVector: if( v2.vector( ).size( ) == 5 ) v.setColor( v2.vector( ) + v.color( ) ); else printError( i18n( "You can't add a vector with a color" ) ); break; case PMVColor: v.setColor( v.color( ) + v2.color( ) ); break; } break; } break; case '-': nextToken( ); if( !parseNumericExpression( v2 ) ) break; switch( v.type( ) ) { case PMVFloat: switch( v2.type( ) ) { case PMVFloat: v.setFloat( v.floatValue( ) - v2.floatValue( ) ); break; case PMVVector: v.setVector( v2.vector( ) - v.floatValue( ) ); break; case PMVColor: v.setColor( v2.color( ) - v.floatValue( ) ); break; } break; case PMVVector: switch( v2.type( ) ) { case PMVFloat: v.setVector( v.vector( ) - v2.floatValue( ) ); break; case PMVVector: v.setVector( v.vector( ) - v2.vector( ) ); break; case PMVColor: if( v.vector( ).size( ) == 5 ) v.setColor( v.vector( ) - v2.color( ) ); else printError( i18n( "You can't subtract a vector and a color" ) ); break; } break; case PMVColor: switch( v2.type( ) ) { case PMVFloat: v.setColor( v.color( ) - v2.floatValue( ) ); break; case PMVVector: if( v2.vector( ).size( ) == 5 ) v.setColor( v2.vector( ) - v.color( ) ); else printError( i18n( "You can't subtract a vector and a color" ) ); break; case PMVColor: v.setColor( v.color( ) - v2.color( ) ); break; } break; } break; default: end = true; break; } } while( !end ); return true; } bool PMPovrayParser::parseVector( PMVector& vector, unsigned int size ) { PMValue v; unsigned int i; if( !parseNumericExpression( v ) ) return false; switch( v.type( ) ) { case PMVFloat: vector.resize( size ); for( i = 0; i < size; i++ ) vector[i] = v.floatValue( ); break; case PMVVector: vector = v.vector( ); vector.resize( size ); break; default: printError( i18n( "Float or vector expression expected" ) ); return false; } return true; } bool PMPovrayParser::parseFloat( double& d, bool suppressError ) { PMValue v; if( !parseNumericExpression( v, suppressError ) ) return false; switch( v.type( ) ) { case PMVFloat: d = v.floatValue( ); break; case PMVVector: d = ( v.vector( ) )[0]; break; default: printError( i18n( "Float expression expected" ) ); return false; } return true; } bool PMPovrayParser::parseInt( int& i ) { double d; if( !parseFloat( d ) ) return false; i = ( int ) ( d + 0.5 ); return true; } bool PMPovrayParser::parseColor( PMColor& c ) { PMValue v; if( !parseNumericExpression( v ) ) return false; if( v.type( ) == PMVColor ) c = PMColor( v.color( ) ); else if( v.type( ) == PMVVector ) { if( v.vector( ).size( ) == 5 ) c = PMColor( v.vector( ) ); else { printError( i18n( "Color expression expected" ) ); return false; } } else if( v.type( ) == PMVFloat ) { double d = v.floatValue( ); c = PMColor( d, d, d, d, d ); } else { printError( i18n( "Color expression expected" ) ); return false; } return true; } bool PMPovrayParser::parseObjectModifiers( PMGraphicalObject* o ) { bool finished = false; PMSolidObject* so = 0; if( o->isA( "SolidObject" ) ) so = ( PMSolidObject* ) o; do { finished = true; switch( m_token ) { case NO_SHADOW_TOK: o->setNoShadow( true ); nextToken( ); finished = false; break; case NO_IMAGE_TOK: o->setNoImage( true ); nextToken( ); finished = false; break; case NO_REFLECTION_TOK: o->setNoReflection( true ); nextToken( ); finished = false; break; case DOUBLE_ILLUMINATE_TOK: o->setDoubleIlluminate( true ); nextToken( ); finished = false; break; default: break; } if( so ) { switch( m_token ) { case HOLLOW_TOK: so->setHollow( PMTrue ); nextToken( ); if( isTrue( ) ) nextToken( ); else if( isFalse( ) ) { nextToken( ); so->setHollow( PMFalse ); } finished = false; break; case INVERSE_TOK: so->setInverse( true ); nextToken( ); finished = false; break; default: break; } } } while( !finished ); return true; } bool PMPovrayParser::parseCSG( PMCSG* pNewCSG ) { int oldConsumed; switch( m_token ) { case UNION_TOK: pNewCSG->setCSGType( PMCSG::CSGUnion ); break; case INTERSECTION_TOK: pNewCSG->setCSGType( PMCSG::CSGIntersection ); break; case DIFFERENCE_TOK: pNewCSG->setCSGType( PMCSG::CSGDifference ); break; case MERGE_TOK: pNewCSG->setCSGType( PMCSG::CSGMerge ); break; default: printUnexpected( m_pScanner->sValue( ) ); return false; break; } nextToken( ); if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; parseChildObjects( pNewCSG ); parseObjectModifiers( pNewCSG ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseBox( PMBox* pNewBox ) { PMVector vector; int oldConsumed; if( !parseToken( BOX_TOK, "box" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewBox->setCorner1( vector ); if( !parseToken( ',' ) ) return false; if( !parseVector( vector ) ) return false; pNewBox->setCorner2( vector ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewBox ); parseObjectModifiers( pNewBox ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSphere( PMSphere* pNewSphere ) { PMVector vector; double radius; int oldConsumed; if( !parseToken( SPHERE_TOK, "sphere" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewSphere->setCentre( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewSphere->setRadius( radius ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewSphere ); parseObjectModifiers( pNewSphere ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseCylinder( PMCylinder* pNewCyl ) { PMVector vector; double radius; int oldConsumed; if( !parseToken( CYLINDER_TOK, "cylinder" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewCyl->setEnd1( vector ); if( !parseToken( ',' ) ) return false; if( !parseVector( vector ) ) return false; pNewCyl->setEnd2( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat(radius) ) return false; pNewCyl->setRadius( radius ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewCyl ); parseObjectModifiers( pNewCyl ); switch( m_token ) { case OPEN_TOK: nextToken( ); pNewCyl->setOpen( true ); } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseCone( PMCone* pNewCone ) { PMVector vector; double radius; int oldConsumed; if( !parseToken( CONE_TOK, "cone" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewCone->setEnd1( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewCone->setRadius1( radius ); if( !parseToken( ',' ) ) return false; if( !parseVector( vector ) ) return false; pNewCone->setEnd2( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewCone->setRadius2( radius ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewCone ); parseObjectModifiers( pNewCone ); switch( m_token ) { case OPEN_TOK: nextToken( ); pNewCone->setOpen( true ); } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseTorus( PMTorus* pNewTorus ) { double radius; int oldConsumed; if( !parseToken( TORUS_TOK, "torus" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseFloat( radius ) ) return false; pNewTorus->setMajorRadius( radius ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewTorus->setMinorRadius( radius ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewTorus ); parseObjectModifiers( pNewTorus ); switch( m_token ) { case STURM_TOK: nextToken( ); pNewTorus->setSturm( true ); } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseBlob( PMBlob* pNewBlob ) { PMVector vector; double threshold; int oldConsumed; if( !parseToken( BLOB_TOK, "blob" ) ) return false; if( !parseToken( '{' ) ) return false; pNewBlob->setThreshold( 1.0 ); do { oldConsumed = m_consumedTokens; switch( m_token ) { case STURM_TOK: nextToken( ); pNewBlob->setSturm( true ); break; case HIERARCHY_TOK: pNewBlob->setHierarchy( true ); nextToken( ); if( isTrue( ) ) nextToken( ); else if( isFalse( ) ) { nextToken( ); pNewBlob->setHierarchy( false ); } break; case THRESHOLD_TOK: nextToken( ); if( parseFloat( threshold ) ) { if( threshold <= 0 ) printError( i18n( "The threshold value has to be positive" ) ); else pNewBlob->setThreshold( threshold ); } break; } parseChildObjects( pNewBlob ); parseObjectModifiers( pNewBlob ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseBlobSphere( PMBlobSphere* pNewBlobSphere ) { PMVector vector; double radius; double strength; int oldConsumed; if( !parseToken( SPHERE_TOK, "sphere" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewBlobSphere->setCentre( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewBlobSphere->setRadius( radius ); if( !parseToken( ',' ) ) return false; if( m_token == STRENGTH_TOK ) nextToken( ); if( !parseFloat( strength ) ) return false; pNewBlobSphere->setStrength( strength ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewBlobSphere ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseBlobComponent( PMBlobSphere* pNewBlobSphere ) { PMVector vector; double radius; double strength; if( !parseToken( COMPONENT_TOK, "component" ) ) return false; if( !parseFloat( strength ) ) return false; pNewBlobSphere->setStrength( strength ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewBlobSphere->setRadius( radius ); if( !parseToken( ',' ) ) return false; if( !parseVector( vector ) ) return false; pNewBlobSphere->setCentre( vector ); return true; } bool PMPovrayParser::parseBlobCylinder( PMBlobCylinder* pNewBlobCylinder ) { PMVector vector; double radius; double strength; int oldConsumed; if( !parseToken( CYLINDER_TOK, "cylinder" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewBlobCylinder->setEnd1( vector ); if( !parseToken( ',' ) ) return false; if( !parseVector( vector ) ) return false; pNewBlobCylinder->setEnd2( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( radius ) ) return false; pNewBlobCylinder->setRadius( radius ); if( !parseToken( ',' ) ) return false; if( m_token == STRENGTH_TOK ) nextToken( ); if( !parseFloat( strength ) ) return false; pNewBlobCylinder->setStrength( strength ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewBlobCylinder ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseHeightField( PMHeightField* pNewHeightField ) { int oldConsumed; double wl; if( !parseToken( HEIGHT_FIELD_TOK, "height_field" ) ) return false; if( !parseToken( '{' ) ) return false; switch( m_token ) { case GIF_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFgif ); nextToken( ); break; case TGA_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFtga ); nextToken( ); break; case POT_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFpot ); nextToken( ); break; case PNG_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFpng ); nextToken( ); break; case PGM_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFpgm ); nextToken( ); break; case PPM_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFppm ); nextToken( ); break; case SYS_TOK: pNewHeightField->setHeightFieldType( PMHeightField::HFsys ); nextToken( ); break; default: printExpected( i18n( "height field type" ), m_pScanner->sValue( ) ); return false; } if( m_token != STRING_TOK ) { printExpected( i18n( "height field file" ), m_pScanner->sValue( ) ); return false; } else { pNewHeightField->setFileName( m_pScanner->sValue( ) ); nextToken( ); } do { oldConsumed = m_consumedTokens; switch( m_token ) { case SMOOTH_TOK: nextToken( ); pNewHeightField->setSmooth( true ); if( isTrue( ) ) nextToken( ); else if( isFalse( ) ) { nextToken( ); pNewHeightField->setSmooth( false ); } break; case HIERARCHY_TOK: pNewHeightField->setHierarchy( true ); nextToken( ); if( isTrue( ) ) nextToken( ); else if( isFalse( ) ) { nextToken( ); pNewHeightField->setHierarchy( false ); } break; case WATER_LEVEL_TOK: nextToken( ); if( parseFloat( wl ) ) { if( ( wl < 0.0 ) || ( wl > 1.0 ) ) printError( i18n( "The water level has to be between 0 and 1" ) ); else pNewHeightField->setWaterLevel( wl ); } break; } parseChildObjects( pNewHeightField ); parseObjectModifiers( pNewHeightField ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseText( PMText* pNewText ) { int oldConsumed; double thickness; PMVector offset; if( !parseToken( TEXT_TOK, "text" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseToken( TTF_TOK, "ttf" ) ) return false; if( m_token != STRING_TOK ) { printExpected( i18n( "font file name" ), m_pScanner->sValue( ) ); return false; } else { pNewText->setFont( m_pScanner->sValue( ) ); nextToken( ); } if( m_token != STRING_TOK ) { printExpected( i18n( "string of text" ), m_pScanner->sValue( ) ); return false; } else { pNewText->setText( m_pScanner->sValue( ) ); nextToken( ); } if( !parseFloat( thickness ) ) return false; pNewText->setThickness( thickness ); parseToken( ',' ); if( parseVector( offset, 2 ) ) pNewText->setOffset( offset ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewText ); parseObjectModifiers( pNewText ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseJuliaFractal( PMJuliaFractal* pNewFractal ) { int oldConsumed; double d; int i; PMVector v( 4 ), v2( 2 ); if( !parseToken( JULIA_FRACTAL_TOK, "julia_fractal" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( v, 4 ) ) return false; pNewFractal->setJuliaParameter( v ); do { oldConsumed = m_consumedTokens; switch( m_token ) { case TQUATERNION_TOK: pNewFractal->setAlgebraType( PMJuliaFractal::Quaternion ); nextToken( ); break; case HYPERCOMPLEX_TOK: pNewFractal->setAlgebraType( PMJuliaFractal::Hypercomplex ); nextToken( ); break; case STQR_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTsqr ); nextToken( ); break; case CUBE_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTcube ); nextToken( ); break; case EXP_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTexp ); nextToken( ); break; case RECIPROCAL_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTreciprocal ); nextToken( ); break; case SIN_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTsin ); nextToken( ); break; case ASIN_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTasin ); nextToken( ); break; case SINH_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTsinh ); nextToken( ); break; case ASINH_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTasinh ); nextToken( ); break; case COS_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTcos ); nextToken( ); break; case ACOS_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTacos ); nextToken( ); break; case COSH_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTcosh ); nextToken( ); break; case ACOSH_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTacosh ); nextToken( ); break; case TAN_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTtan ); nextToken( ); break; case ATAN_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTatan ); nextToken( ); break; case TANH_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTtanh ); nextToken( ); break; case ATANH_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTatanh ); nextToken( ); break; case LOG_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTlog ); nextToken( ); break; case PWR_TOK: pNewFractal->setFunctionType( PMJuliaFractal::FTpwr ); nextToken( ); if( !parseToken( '(' ) ) return false; if( !parseFloat( v2[0] ) ) return false; parseToken( ',' ); if( !parseFloat( v2[1] ) ) return false; if( !parseToken( ')' ) ) return false; pNewFractal->setExponent( v2 ); break; case MAX_ITERATION_TOK: nextToken( ); if( !parseInt( i ) ) return false; if( i <= 0 ) { printWarning( i18n( "Maximum iterations are less than 1, fixed" ) ); i = 1; } pNewFractal->setMaximumIterations( i ); break; case PRECISION_TOK: nextToken( ); if( !parseFloat( d ) ) return false; if( d < 1.0 ) { printWarning( i18n( "Precision is less than 1.0, fixed" ) ); d = 1.0; } pNewFractal->setPrecision( d ); break; case SLICE_TOK: nextToken( ); if( !parseVector( v, 4 ) ) return false; pNewFractal->setSliceNormal( v ); parseToken( ',' ); if( !parseFloat( d ) ) return false; pNewFractal->setSliceDistance( d ); break; } parseChildObjects( pNewFractal ); parseObjectModifiers( pNewFractal ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePlane( PMPlane* pNewPlane ) { double dist; PMVector vector; int oldConsumed; if( !parseToken( PLANE_TOK, "plane" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewPlane->setNormal( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( dist ) ) return false; pNewPlane->setDistance( dist ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewPlane ); parseObjectModifiers( pNewPlane ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } const int c_polynomSize[8] = { 0, 0, 10, 20, 35, 56, 84, 120 }; bool PMPovrayParser::parsePolynom( PMPolynom* pNewPoly ) { PMVector vector; double d; PMVector c; int oldConsumed; int order = 2; int type = m_token; pNewPoly->setSturm( false ); if( ( m_token == TQUADRIC_TOK ) || ( m_token == CUBIC_TOK ) || ( m_token == TQUARTIC_TOK ) || ( m_token == POLY_TOK ) ) { nextToken( ); if( !parseToken( '{' ) ) return false; } else printExpected( "poly", m_pScanner->sValue( ) ); if( type == TQUADRIC_TOK ) { c = PMVector( 10 ); pNewPoly->setPolynomOrder( 2 ); // parse the quadric coefficients if( !parseVectorLiteral( vector ) ) return false; vector.resize( 3 ); c[0] = vector[0]; c[4] = vector[1]; c[7] = vector[2]; parseToken( ',' ); if( !parseVectorLiteral( vector ) ) return false; vector.resize( 3 ); c[1] = vector[0]; c[2] = vector[1]; c[5] = vector[2]; parseToken( ',' ); if( !parseVectorLiteral( vector ) ) return false; vector.resize( 3 ); c[3] = vector[0]; c[6] = vector[1]; c[8] = vector[2]; parseToken( ',' ); if( !parseFloat( d ) ) return false; c[9] = d; pNewPoly->setCoefficients( c ); } else { if( type == CUBIC_TOK ) order = 3; else if( type == TQUARTIC_TOK ) order = 4; else { if( !parseInt( order ) ) return false; if( ( order < 2 ) || ( order > 7 ) ) { printError( i18n( "The polynom order has to be between 2 and 7 inclusive" ) ); return false; } parseToken( ',' ); } pNewPoly->setPolynomOrder( order ); if( !parseVectorLiteral( vector ) ) return false; if( vector.size( ) != ( unsigned ) c_polynomSize[order] ) { printError( i18n( "%1 coefficients are needed for a polynom with order %2" ) .tqarg( c_polynomSize[order] ).tqarg( order ) ); vector.resize( c_polynomSize[order] ); } pNewPoly->setCoefficients( vector ); } do { oldConsumed = m_consumedTokens; if( m_token == STURM_TOK ) { pNewPoly->setSturm( true ); nextToken( ); } parseChildObjects( pNewPoly ); parseObjectModifiers( pNewPoly ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseBicubicPatch( PMBicubicPatch* pNewPatch ) { PMVector vector; bool stop = false; int oldConsumed; int type; int steps; double flatness; int i; if( !parseToken( BICUBIC_PATCH_TOK, "bicubic_patch" ) ) return false; if( !parseToken( '{' ) ) return false; // parse patch items do { switch( m_token ) { case TYPE_TOK: nextToken( ); if( parseInt( type ) ) { if( ( type == 0 ) || ( type == 1 ) ) pNewPatch->setPatchType( type ); else printError( i18n( "Patch type has to be 0 or 1" ) ); } break; case U_STEPS_TOK: nextToken( ); if( parseInt( steps ) ) pNewPatch->setUSteps( steps ); break; case V_STEPS_TOK: nextToken( ); if( parseInt( steps ) ) pNewPatch->setVSteps( steps ); break; case FLATNESS_TOK: nextToken( ); if( parseFloat( flatness ) ) pNewPatch->setFlatness( flatness ); break; case UV_VECTORS_TOK: pNewPatch->enableUV( true ); nextToken( ); for ( i = 0; i < 4; ++i ) { if( parseVector( vector ) ) pNewPatch->setUVVector( i, vector ); else return false; } break; case ',': nextToken( ); stop = true; break; default: stop = true; break; } } while( !stop ); // parse control points stop = false; for( i = 0; ( i < 16 ) && !stop; i++ ) { if( parseVector( vector ) ) { pNewPatch->setControlPoint( i, vector ); if( i < 15 ) if( !parseToken( ',' ) ) stop = true; } else stop = true; } do { oldConsumed = m_consumedTokens; parseChildObjects( pNewPatch ); parseObjectModifiers( pNewPatch ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseDisc( PMDisc* pNewDisc ) { double d; PMVector vector; int oldConsumed; if( !parseToken( DISC_TOK, "disc" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pNewDisc->setCenter( vector ); if( !parseToken( ',' ) ) return false; if( !parseVector( vector ) ) return false; pNewDisc->setNormal( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( d ) ) return false; pNewDisc->setRadius( d ); if( m_token == ',' ) { nextToken( ); if( !parseFloat( d ) ) return false; pNewDisc->setHoleRadius( d ); } do { oldConsumed = m_consumedTokens; parseChildObjects( pNewDisc ); parseObjectModifiers( pNewDisc ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseTriangle( PMTriangle* pNewTriangle ) { PMVector vector; int oldConsumed; int i; if( m_token == SMOOTH_TRIANGLE_TOK ) pNewTriangle->setSmoothTriangle( true ); else if( m_token == TRIANGLE_TOK ) pNewTriangle->setSmoothTriangle( false ); else { printExpected( "triangle", m_pScanner->sValue( ) ); return false; } nextToken( ); if( !parseToken( '{' ) ) return false; for( i = 0; i < 3; i++ ) { if( i != 0 ) parseToken( ',' ); if( !parseVector( vector ) ) return false; pNewTriangle->setPoint( i, vector ); if( pNewTriangle->isSmoothTriangle( ) ) { parseToken( ',' ); if( !parseVector( vector ) ) return false; pNewTriangle->setNormal( i, vector ); } } do { oldConsumed = m_consumedTokens; parseChildObjects( pNewTriangle ); parseObjectModifiers( pNewTriangle ); if( m_token == UV_VECTORS_TOK ) { nextToken( ); pNewTriangle->enableUV( true ); for ( i = 0; i < 3; ++i ) { if( parseVector( vector ) ) pNewTriangle->setUVVector( i, vector ); else return false; } } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseLathe( PMLathe* pNewLathe ) { PMVector vector; int oldConsumed; int i; bool stop = false; if( !parseToken( LATHE_TOK, "lathe" ) ) return false; if( !parseToken( '{' ) ) return false; int minp = 2; while( !stop ) { switch( m_token ) { case LINEAR_SPLINE_TOK: pNewLathe->setSplineType( PMLathe::LinearSpline ); nextToken( ); minp = 2; break; case TQUADRATIC_SPLINE_TOK: pNewLathe->setSplineType( PMLathe::QuadraticSpline ); nextToken( ); minp = 3; break; case CUBIC_SPLINE_TOK: pNewLathe->setSplineType( PMLathe::CubicSpline ); nextToken( ); minp = 4; break; case BEZIER_SPLINE_TOK: pNewLathe->setSplineType( PMLathe::BezierSpline ); nextToken( ); minp = 4; break; default: stop = true; break; } } int nump; if( !parseInt( nump ) ) return false; TQValueList<PMVector> points; for( i = 0; i < nump; i++ ) { parseToken( ',' ); if( !parseVector( vector ) ) return false; vector.resize( 2 ); points.append( vector ); } if( nump < minp ) printError( i18n( "At least %1 points are needed for that spline type" ) .tqarg( minp ) ); else if( ( pNewLathe->splineType( ) == PMLathe::BezierSpline ) && ( ( nump % 4 ) != 0 ) ) printError( i18n( "Bezier splines need 4 points for each segment" ) ); else pNewLathe->setPoints( points ); do { oldConsumed = m_consumedTokens; if( m_token == STURM_TOK ) { pNewLathe->setSturm( true ); nextToken( ); } parseChildObjects( pNewLathe ); parseObjectModifiers( pNewLathe ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePrism( PMPrism* pNewPrism ) { PMVector vector; double height; int oldConsumed; int i; bool stop = false; if( !parseToken( PRISM_TOK, "prism" ) ) return false; if( !parseToken( '{' ) ) return false; int minp = 3; while( !stop ) { switch( m_token ) { case LINEAR_SPLINE_TOK: pNewPrism->setSplineType( PMPrism::LinearSpline ); nextToken( ); minp = 3; break; case TQUADRATIC_SPLINE_TOK: pNewPrism->setSplineType( PMPrism::QuadraticSpline ); nextToken( ); minp = 4; break; case CUBIC_SPLINE_TOK: pNewPrism->setSplineType( PMPrism::CubicSpline ); nextToken( ); minp = 5; break; case BEZIER_SPLINE_TOK: pNewPrism->setSplineType( PMPrism::BezierSpline ); nextToken( ); minp = 4; break; case LINEAR_SWEEP_TOK: pNewPrism->setSweepType( PMPrism::LinearSweep ); nextToken( ); break; case CONIC_SWEEP_TOK: pNewPrism->setSweepType( PMPrism::ConicSweep ); nextToken( ); break; default: stop = true; break; } } if( !parseFloat( height ) ) return false; pNewPrism->setHeight1( height ); parseToken( ',' ); if( !parseFloat( height ) ) return false; pNewPrism->setHeight2( height ); parseToken( ',' ); int nump; if( !parseInt( nump ) ) return false; TQValueList<PMVector> allPoints; for( i = 0; i < nump; i++ ) { parseToken( ',' ); if( !parseVector( vector ) ) return false; vector.resize( 2 ); allPoints.append( vector ); } TQValueList< TQValueList<PMVector> > points; TQValueList<PMVector> subPoints; TQValueList<PMVector>::Iterator it = allPoints.begin( ); int pnr = 0, pmod4; PMVector ref( 2 ), ref2( 2 ); bool error = false; bool last = false; switch( pNewPrism->splineType( ) ) { case PMPrism::LinearSpline: for( ; ( it != allPoints.end( ) ) && !error; ++it, pnr++ ) { if( pnr == 0 ) { ref = *it; subPoints.append( *it ); } else { if( ref.approxEqual( *it ) ) { if( pnr < 3 ) { printError( i18n( "Linear splines need at least 4 points." ) ); error = true; } else { points.append( subPoints ); subPoints.clear( ); pnr = -1; } } else subPoints.append( *it ); } } if( ( pnr != 0 ) && ( !error ) ) { printWarning( i18n( "Linear spline not closed" ) ); if( pnr < 3 ) { printError( i18n( "Linear splines need at least 4 points." ) ); error = true; } else { points.append( subPoints ); subPoints.clear( ); } } break; case PMPrism::QuadraticSpline: for( ; ( it != allPoints.end( ) ) && !error; ++it, pnr++ ) { if( pnr == 0 ) subPoints.append( *it ); else if( pnr == 1 ) { ref = *it; subPoints.append( *it ); } else { if( ref.approxEqual( *it ) ) { if( pnr < 4 ) { printError( i18n( "Quadratic splines need at least 5 points." ) ); error = true; } else { points.append( subPoints ); subPoints.clear( ); pnr = -1; } } else subPoints.append( *it ); } } if( ( pnr != 0 ) && ( !error ) ) { printError( i18n( "Quadratic spline not closed" ) ); error = true; } break; case PMPrism::CubicSpline: for( ; ( it != allPoints.end( ) ) && !error; ++it, pnr++ ) { if( pnr == 0 ) subPoints.append( *it ); else if( pnr == 1 ) { ref = *it; subPoints.append( *it ); } else if( last ) { if( pnr < 5 ) { printError( i18n( "Cubic splines need at least 6 points." ) ); error = true; } else { subPoints.append( *it ); points.append( subPoints ); subPoints.clear( ); pnr = -1; last = false; } } else { if( ref.approxEqual( *it ) ) last = true; else subPoints.append( *it ); } } if( ( pnr != 0 ) && ( !error ) ) { printError( i18n( "Cubic spline not closed" ) ); error = true; } break; case PMPrism::BezierSpline: for( ; ( it != allPoints.end( ) ) && !error; ++it, pnr++ ) { pmod4 = pnr % 4; if( pnr == 0 ) { ref = *it; subPoints.append( *it ); } else if( pmod4 == 0 ) { if( !ref2.approxEqual( *it ) ) { printError( i18n( "Bezier spline not closed" ) ); error = true; } } else if( pmod4 == 3 ) { if( ref.approxEqual( *it ) ) { points.append( subPoints ); subPoints.clear( ); pnr = -1; } else { subPoints.append( *it ); ref2 = *it; } } else subPoints.append( *it ); } if( ( pnr != 0 ) && ( !error ) ) { printError( i18n( "Bezier spline not closed" ) ); error = true; } break; } if( !error ) pNewPrism->setPoints( points ); do { oldConsumed = m_consumedTokens; switch( m_token ) { case STURM_TOK: pNewPrism->setSturm( true ); nextToken( ); break; case OPEN_TOK: pNewPrism->setOpen( true ); nextToken( ); break; default: break; } parseChildObjects( pNewPrism ); parseObjectModifiers( pNewPrism ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSor( PMSurfaceOfRevolution* pNewSor ) { PMVector vector; int oldConsumed; int i; if( !parseToken( SOR_TOK, "sor" ) ) return false; if( !parseToken( '{' ) ) return false; int nump; if( !parseInt( nump ) ) return false; TQValueList<PMVector> points; for( i = 0; i < nump; i++ ) { parseToken( ',' ); if( !parseVector( vector ) ) return false; vector.resize( 2 ); points.append( vector ); } if( nump < 4 ) printError( i18n( "At least 4 points are needed for the surface of revolution" ) ); else { TQValueList<PMVector>::Iterator it1 = points.begin( ); TQValueList<PMVector>::Iterator it2 = it1; ++it2; TQValueList<PMVector>::Iterator it3 = it2; ++it3; int pnr = 0; for( ; it3 != points.end( ); ++it1, ++it2, ++it3, pnr++ ) { if( ( pnr == 0 ) || ( pnr == ( nump - 3 ) ) ) { if( approxZero( ( *it1 )[1] - ( *it3 )[1], c_sorTolerance ) ) { printError( i18n( "The v coordinate of point %1 and %2 must be different; fixed" ) .tqarg( pnr + 1 ).tqarg( pnr + 3 ) ); if( pnr == 0 ) ( *it1 )[1] = ( *it3 )[1] - c_sorTolerance; else ( *it3 )[1] = ( *it1 )[1] + c_sorTolerance; } } if( pnr != 0 ) { if( ( ( *it2 )[1] - ( *it1 )[1] ) < c_sorTolerance ) { printError( i18n( "The v coordinates must be strictly increasing; fixed" ) ); ( *it2 )[1] = ( *it1 )[1] + c_sorTolerance; } } } pNewSor->setPoints( points ); } do { oldConsumed = m_consumedTokens; switch( m_token ) { case STURM_TOK: pNewSor->setSturm( true ); nextToken( ); break; case OPEN_TOK: pNewSor->setOpen( true ); nextToken( ); break; default: break; } parseChildObjects( pNewSor ); parseObjectModifiers( pNewSor ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSqe( PMSuperquadricEllipsoid* pNewSqe ) { PMVector vector; int oldConsumed; if( !parseToken( SUPERELLIPSOID_TOK ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; vector.resize( 2 ); if( vector[0] < 0.001 ) { printError( i18n( "The east-west exponent must be greater than 0.001" ) ); vector[0] = 0.001; } if( vector[1] < 0.001 ) { printError( i18n( "The north-south exponent must be greater than 0.001" ) ); vector[1] = 0.001; } pNewSqe->setEastWestExponent( vector[0] ); pNewSqe->setNorthSouthExponent( vector[1] ); do { oldConsumed = m_consumedTokens; parseChildObjects( pNewSqe ); parseObjectModifiers( pNewSqe ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseRotate( PMRotate* rotate ) { PMVector v; if( !parseToken( ROTATE_TOK, "rotate" ) ) return false; if( !parseVector( v ) ) return false; rotate->setRotation( v ); return true; } bool PMPovrayParser::parseScale( PMScale* scale ) { PMVector v; if( !parseToken( SCALE_TOK, "scale" ) ) return false; if( !parseVector( v ) ) return false; scale->setScale( v ); return true; } bool PMPovrayParser::parseTranslate( PMTranslate* translate ) { PMVector v; if( !parseToken( TRANSLATE_TOK, "translate" ) ) return false; if( !parseVector( v ) ) return false; translate->setTranslation( v ); return true; } bool PMPovrayParser::parseMatrix( PMPovrayMatrix* matrix ) { PMVector v; if( !parseToken( MATRIX_TOK ), "matrix" ) return false; if( !parseVectorLiteral( v ) ) return false; if( v.size( ) != 12 ) { printError( i18n( "Wrong number of matrix values." ) ); v.resize( 12 ); } matrix->setValues( v ); return true; } bool PMPovrayParser::parseBoundedBy( PMBoundedBy* bound ) { int oldConsumed; if( !parseToken( BOUNDED_BY_TOK, "bounded_by" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; if( m_token == CLIPPED_BY_TOK ) nextToken( ); parseChildObjects( bound ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseClippedBy( PMClippedBy* clipped ) { int oldConsumed; if( !parseToken( CLIPPED_BY_TOK, "clipped_by" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; if( m_token == BOUNDED_BY_TOK ) nextToken( ); parseChildObjects( clipped ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseCamera( PMCamera* camera ) { PMVector v; double d; int i; int oldConsumed; if( !parseToken( CAMERA_TOK, "camera" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; do { oldConsumed = m_consumedTokens; switch( m_token ) { case PERSPECTIVE_TOK: nextToken( ); camera->setCameraType( PMCamera::Perspective ); break; case ORTHOGRAPHIC_TOK: nextToken( ); camera->setCameraType( PMCamera::Orthographic ); break; case FISHEYE_TOK: nextToken( ); camera->setCameraType( PMCamera::FishEye ); break; case ULTRA_WIDE_ANGLE_TOK: nextToken( ); camera->setCameraType( PMCamera::UltraWideAngle ); break; case OMNIMAX_TOK: nextToken( ); camera->setCameraType( PMCamera::Omnimax ); break; case PANORAMIC_TOK: nextToken( ); camera->setCameraType( PMCamera::Panoramic ); break; case CYLINDER_TOK: nextToken( ); camera->setCameraType( PMCamera::Cylinder ); if( parseInt( i ) ) camera->setCylinderType( i ); break; case LOCATION_TOK: nextToken( ); if( parseVector( v ) ) camera->setLocation( v ); break; case SKY_TOK: nextToken( ); if( parseVector( v ) ) camera->setSky( v ); break; case UP_TOK: nextToken( ); if( parseVector( v ) ) camera->setUp( v ); break; case RIGHT_TOK: nextToken( ); if( parseVector( v ) ) camera->setRight( v ); break; case DIRECTION_TOK: nextToken( ); if( parseVector( v ) ) camera->setDirection( v ); break; case LOOK_AT_TOK: nextToken( ); if( parseVector( v ) ) camera->setLookAt( v ); break; case ANGLE_TOK: nextToken( ); if( parseFloat( d ) ) { camera->enableAngle( true ); camera->setAngle( d ); } break; case BLUR_SAMPLES_TOK: nextToken( ); camera->enableFocalBlur( true ); if( parseInt( i ) ) camera->setBlurSamples( i ); break; case APERTURE_TOK: nextToken( ); camera->enableFocalBlur( true ); if( parseFloat( d ) ) camera->setAperture( d ); break; case FOCAL_POINT_TOK: nextToken( ); if( parseVector( v ) ) camera->setFocalPoint( v ); break; case CONFIDENCE_TOK: nextToken( ); if( parseFloat( d ) ) camera->setConfidence( d ); break; case VARIANCE_TOK: nextToken( ); if( parseFloat( d ) ) camera->setVariance( d ); break; default: break; } } while( oldConsumed != m_consumedTokens ); parseChildObjects( camera ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseLight( PMLight* light ) { PMVector v; PMColor c; double d; int i; int oldConsumed; if( !parseToken( LIGHT_SOURCE_TOK, "light_source" ) ) return false; if( !parseToken( '{' ) ) return false; if( !parseVector( v ) ) return false; light->setLocation( v ); if( m_token == ',' ) nextToken( ); if( !parseColor( c ) ) return false; light->setColor( c ); do { oldConsumed = m_consumedTokens; parseChildObjects( light ); switch( m_token ) { case SPOTLIGHT_TOK: nextToken( ); light->setLightType( PMLight::SpotLight ); break; case CYLINDER_TOK: nextToken( ); light->setLightType( PMLight::CylinderLight ); break; case SHADOWLESS_TOK: nextToken( ); light->setLightType( PMLight::ShadowlessLight ); break; case RADIUS_TOK: nextToken( ); if( parseFloat( d ) ) light->setRadius( d ); break; case FALLOFF_TOK: nextToken( ); if( parseFloat( d ) ) light->setFalloff( d ); break; case TIGHTNESS_TOK: nextToken( ); if( parseFloat( d ) ) light->setTightness( d ); break; case POINT_AT_TOK: nextToken( ); if( parseVector( v ) ) light->setPointAt( v ); break; case PARALLEL_TOK: nextToken( ); light->setParallel( parseBool( ) ); break; case AREA_LIGHT_TOK: nextToken( ); light->setAreaLight( true ); if( parseVector( v ) ) light->setAxis1( v ); parseToken( ',' ); if( parseVector( v ) ) light->setAxis2( v ); parseToken( ',' ); if( parseInt( i ) ) light->setSize1( i ); parseToken( ',' ); if( parseInt( i ) ) light->setSize2( i ); break; case AREA_CIRCULAR_TOK: nextToken( ); light->setAreaType( PMLight::Circular ); break; case ADAPTIVE_TOK: nextToken( ); if( parseInt( i ) ) light->setAdaptive( i ); break; case ORIENT_TOK: nextToken( ); light->setOrient( parseBool( ) ); break; case JITTER_TOK: nextToken( ); light->setJitter( parseBool( ) ); break; case FADE_POWER_TOK: nextToken( ); light->setFading( true ); if( parseInt( i ) ) light->setFadePower( i ); break; case FADE_DISTANCE_TOK: nextToken( ); light->setFading( true ); if( parseFloat( d ) ) light->setFadeDistance( d ); break; case MEDIA_INTERACTION_TOK: nextToken( ); light->setMediaInteraction( parseBool( ) ); break; case MEDIA_ATTENUATION_TOK: nextToken( ); light->setMediaAttenuation( parseBool( ) ); break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseLooksLike( PMLooksLike* ll ) { if( !parseToken( LOOKS_LIKE_TOK, "looks_like" ) ) return false; if( !parseToken( '{' ) ) return false; parseChildObjects( ll ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseProjectedThrough( PMProjectedThrough* ll ) { if( !parseToken( PROJECTED_THROUGH_TOK, "projected_through" ) ) return false; if( !parseToken( '{' ) ) return false; parseChildObjects( ll ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseTexture( PMTexture* texture, bool parseOuter ) { int oldConsumed; if( parseOuter ) { if( !parseToken( TEXTURE_TOK, "texture" ) ) return false; if( !parseToken( '{' ) ) return false; } if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !texture->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( texture ); if( m_token == UV_MAPPING_TOK ) { nextToken(); texture->setUVMapping( parseBool( ) ); } } while( oldConsumed != m_consumedTokens ); if( parseOuter ) if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePattern( PMPattern* pattern, bool normal ) { PMVector vector; double f_number; int i_number; int oldConsumed; bool type; do { oldConsumed = m_consumedTokens; type = false; switch( m_token ) { case AGATE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternAgate ); type = true; break; case AGATE_TURB_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; pattern->setAgateTurbulence( f_number ); break; case AVERAGE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternAverage ); type = true; break; case BOXED_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternBoxed ); type = true; break; case BOZO_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternBozo ); type = true; break; case BUMPS_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternBumps ); type = true; break; case CELLS_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternCells ); type = true; break; case CRACKLE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternCrackle ); type = true; break; case CYLINDRICAL_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternCylindrical ); type = true; break; case DENTS_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternDents ); type = true; break; case DENSITY_FILE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternDensity ); type = true; if( !parseToken( DF3_TOK, "df3" ) ) return false; if( m_token != STRING_TOK ) { printError( i18n( "Expecting a file name." ) ); return false; } else { pattern->setDensityFile( m_pScanner->sValue( ) ); nextToken( ); } if( parseToken( INTERPOLATE_TOK, "interpolate" ) ) { if( !parseInt( i_number ) ) return false; else pattern->setDensityInterpolate( i_number ); } break; case GRADIENT_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternGradient ); type = true; if( !parseVector( vector ) ) return false; pattern->setGradient( vector ); break; case GRANITE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternGranite ); type = true; break; case JULIA_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternJulia ); type = true; if( !parseVector( vector ) ) return false; pattern->setJuliaComplex( vector ); if( !parseInt( i_number ) ) return false; pattern->setMaxIterations( i_number ); break; case LEOPARD_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternLeopard ); type = true; break; case MANDEL_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternMandel ); type = true; if( !parseInt( i_number ) ) return false; pattern->setMaxIterations( i_number ); break; case MARBLE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternMarble ); type = true; break; case ONION_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternOnion ); type = true; break; case PLANAR_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternPlanar ); type = true; break; case TQUILTED_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternQuilted ); type = true; break; case CONTROL0_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; pattern->setQuiltControl0( f_number ); break; case CONTROL1_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; pattern->setQuiltControl1( f_number ); break; case RADIAL_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternRadial ); type = true; break; case RIPPLES_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternRipples ); type = true; break; case SLOPE_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternSlope ); type = true; if( !parseToken( '{' ) ) return false; if( !parseVector( vector ) ) return false; pattern->setSlopeDirection( vector ); if ( parseToken( ',' ) ) { if( !parseFloat( f_number ) ) return false; pattern->setSlopeLoSlope( f_number ); if ( parseToken( ',' ) ) { if ( !parseFloat( f_number ) ) return false; pattern->setSlopeHiSlope( f_number ); } } if( m_token == ALTITUDE_TOK ) { pattern->setSlopeAltFlag( true ); nextToken( ); if ( !parseVector( vector ) ) return false; pattern->setSlopeAltitude( vector ); if( parseToken( ',' ) ) { if ( !parseFloat( f_number ) ) return false; pattern->setSlopeLoAlt( f_number ); if ( parseToken( ',' ) ) { if( !parseFloat( f_number ) ) return false; pattern->setSlopeHiAlt( f_number ); } } } if( !parseToken( '}' ) ) return false; break; case SPHERICAL_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternSpherical ); type = true; break; case SPIRAL1_TOK: case SPIRAL2_TOK: if( m_token == SPIRAL1_TOK ) pattern->setPatternType( PMPattern::PatternSpiral1 ); else pattern->setPatternType( PMPattern::PatternSpiral2 ); type = true; nextToken( ); if( !parseInt( i_number ) ) return false; pattern->setSpiralNumberArms( i_number ); break; case SPOTTED_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternSpotted ); type = true; break; case WAVES_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternWaves ); type = true; break; case WOOD_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternWood ); type = true; break; case WRINKLES_TOK: nextToken( ); pattern->setPatternType( PMPattern::PatternWrinkles ); type = true; break; //crackle parameters case FORM_TOK: nextToken( ); if( !parseVector( vector ) ) return false; pattern->setCrackleForm( vector ); break; case METRIC_TOK: nextToken( ); if ( !parseInt( i_number ) ) return false; pattern->setCrackleMetric( i_number ); break; case OFFSET_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; pattern->setCrackleOffset( f_number ); break; case SOLID_TOK: nextToken( ); pattern->setCrackleSolid( true ); break; //fractal parameters case MAGNET_TOK: nextToken( ); pattern->setFractalMagnet( true ); if ( !parseInt( i_number ) ) return false; pattern->setFractalMagnetType( i_number ); break; case EXPONENT_TOK: nextToken( ); if ( !parseInt( i_number ) ) return false; pattern->setFractalExponent( i_number ); break; case EXTERIOR_TOK: nextToken( ); if ( !parseInt( i_number ) ) return false; pattern->setFractalExtType( i_number ); if ( !parseFloat( f_number ) ) return false; pattern->setFractalExtFactor( f_number ); break; case INTERIOR_TOK: nextToken( ); if ( !parseInt( i_number ) ) return false; pattern->setFractalIntType( i_number ); if ( !parseFloat( f_number ) ) return false; pattern->setFractalIntFactor( f_number ); break; //turbulence case TURBULENCE_TOK: nextToken( ); pattern->enableTurbulence( true ); if( !parseVector( vector ) ) return false; pattern->setValueVector( vector ); break; case OCTAVES_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; pattern->setOctaves( i_number ); break; case OMEGA_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; pattern->setOmega( f_number ); break; case LAMBDA_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; pattern->setLambda( f_number ); break; case NOISE_GENERATOR_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; pattern->setNoiseGenerator( ( PMPattern::PMNoiseType ) ( i_number ) ); break; default: break; } if( type && normal ) { // try to parse the normal pattern depth double depth; if( parseFloat( depth, true ) ) pattern->setDepth( depth ); } } while( oldConsumed != m_consumedTokens ); return true; } bool PMPovrayParser::parseBlendMapModifiers( PMBlendMapModifiers* blend ) { int oldConsumed; double f_number; do { oldConsumed = m_consumedTokens; switch( m_token ) { case FREQUENCY_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; blend->enableFrequency( true ); blend->setFrequency( f_number ); break; case PHASE_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; blend->enablePhase( true ); blend->setPhase( f_number ); break; case RAMP_WAVE_TOK: nextToken( ); blend->enableWaveForm( true ); blend->setWaveFormType( PMBlendMapModifiers::RampWave ); break; case TRIANGLE_WAVE_TOK: nextToken( ); blend->enableWaveForm( true ); blend->setWaveFormType( PMBlendMapModifiers::TriangleWave ); break; case SINE_WAVE_TOK: nextToken( ); blend->enableWaveForm( true ); blend->setWaveFormType( PMBlendMapModifiers::SineWave ); break; case SCALLOP_WAVE_TOK: nextToken( ); blend->enableWaveForm( true ); blend->setWaveFormType( PMBlendMapModifiers::ScallopWave ); break; case CUBIC_WAVE_TOK: nextToken( ); blend->enableWaveForm( true ); blend->setWaveFormType( PMBlendMapModifiers::CubicWave ); break; case POLY_WAVE_TOK: nextToken( ); blend->enableWaveForm( true ); blend->setWaveFormType( PMBlendMapModifiers::PolyWave ); if( parseFloat( f_number, true ) ) blend->setWaveFormExponent( f_number ); break; } } while( oldConsumed != m_consumedTokens ); return true; } bool PMPovrayParser::parseWarp( PMWarp* warp ) { int oldConsumed; PMVector vector; double f_number; int i_number; bool parsedFirst; bool mapping; if( !parseToken( WARP_TOK, "warp" ) ) return false; if( !parseToken( '{' ) ) return false; mapping = false; parsedFirst = false; do { oldConsumed = m_consumedTokens; if( !parsedFirst && ( m_token != REPEAT_TOK || m_token != BLACK_HOLE_TOK || m_token != TURBULENCE_TOK || m_token != CYLINDRICAL_TOK || m_token != SPHERICAL_TOK || m_token != TOROIDAL_TOK || m_token != PLANAR_TOK ) ) { printError( i18n( "Expecting a warp type" ) ); return false; } switch( m_token ) { case REPEAT_TOK: nextToken( ); if( !parsedFirst ) { warp->setWarpType( PMWarp::Repeat ); if( !parseVector( vector ) ) return false; warp->setDirection( vector ); parsedFirst = true; } else { if( !parseVector( vector ) ) return false; warp->setRepeat( vector ); } break; case OFFSET_TOK: nextToken( ); if( !parseVector( vector ) ) return false; warp->setOffset( vector ); break; case FLIP_TOK: nextToken( ); if( !parseVector( vector ) ) return false; warp->setFlip( vector ); break; case BLACK_HOLE_TOK: nextToken( ); warp->setWarpType( PMWarp::BlackHole ); if( !parseVector( vector ) ) return false; warp->setLocation( vector ); if( !parseToken( ',' ) ) return false; if( !parseFloat( f_number ) ) return false; warp->setRadius( f_number ); parsedFirst = true; break; case STRENGTH_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; warp->setStrength( f_number ); break; case FALLOFF_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; warp->setFalloff( f_number ); break; case INVERSE_TOK: nextToken( ); warp->setInverse( true ); break; case TURBULENCE_TOK: if( !parsedFirst ) { nextToken( ); warp->setWarpType( PMWarp::Turbulence ); if( !parseVector( vector ) ) return false; warp->setValueVector( vector ); parsedFirst = true; } else { if( !parseVector( vector ) ) return false; warp->setTurbulence( vector ); } break; case OCTAVES_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; warp->setOctaves( i_number ); break; case OMEGA_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; warp->setOmega( f_number ); break; case LAMBDA_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; warp->setLambda( f_number ); break; case CYLINDRICAL_TOK: warp->setWarpType( PMWarp::Cylindrical ); mapping = true; break; case SPHERICAL_TOK: warp->setWarpType( PMWarp::Spherical ); mapping = true; break; case TOROIDAL_TOK: warp->setWarpType( PMWarp::Toroidal ); mapping = true; break; case PLANAR_TOK: nextToken( ); warp->setWarpType( PMWarp::Planar ); if( parseVector( vector ) ) { warp->setOrientation( vector ); if( parseToken( ',' ) ) { if( !parseFloat( f_number ) ) return false; warp->setDistExp( f_number ); } } parsedFirst = true; break; case DIST_EXP_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; warp->setDistExp( f_number ); break; case MAJOR_RADIUS_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; warp->setMajorRadius( f_number ); break; default: break; } if( mapping) { nextToken( ); if( !parseVector( vector ) ) return false; warp->setOrientation( vector ); parsedFirst = true; mapping = false; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePigment( PMPigment* pigment, bool parseOuter ) { PMColor c; PMSolidColor* sc; int oldConsumed; if( parseOuter ) { if( !parseToken( PIGMENT_TOK, "pigment" ) ) return false; if( !parseToken( '{' ) ) return false; } if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMSymbol* s = getSymbol( id ); bool skipID = false; if( s ) if( s->type( ) == PMSymbol::Value ) skipID = true; if( !skipID ) { PMDeclare* decl = checkLink( id ); if( decl ) { if( !pigment->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } } do { oldConsumed = m_consumedTokens; parseChildObjects( pigment ); switch( m_token ) { case '<': case COLOR_TOK: case COLOUR_TOK: case RGB_TOK: case RGBT_TOK: case RGBF_TOK: case RGBFT_TOK: case RED_TOK: case GREEN_TOK: case BLUE_TOK: case TRANSMIT_TOK: case FILTER_TOK: case ID_TOK: if( parseColor( c ) ) { sc = new PMSolidColor( m_pPart ); sc->setColor( c ); if( !insertChild( sc, pigment ) ) { delete sc; sc = 0; } } break; case UV_MAPPING_TOK: nextToken(); pigment->setUVMapping( parseBool( ) ); break; default: break; } } while( oldConsumed != m_consumedTokens ); if( parseOuter ) if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseNormal( PMNormal* normal ) { double f_number; int oldConsumed; if( !parseToken( NORMAL_TOK, "normal" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !normal->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( normal ); switch( m_token ) { case BUMP_SIZE_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; normal->enableBumpSize( true ); normal->setBumpSize( f_number ); break; case ACCURACY_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; normal->setAccuracy( f_number ); break; case UV_MAPPING_TOK: nextToken( ); normal->setUVMapping( parseBool( ) ); default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseTextureMap( PMTextureMap* textureMap ) { int oldConsumed; double f_number1; PMTexture* texture; TQValueList<double> mapValues; if( !parseToken( TEXTURE_MAP_TOK, "texture_map" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !textureMap->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; if( m_token == '[' ) { nextToken( ); if( !parseFloat( f_number1 ) ) return false; mapValues.append( f_number1 ); texture = new PMTexture( m_pPart ); parseTexture( texture, false ); if( !insertChild( texture, textureMap ) ) delete texture; if( !parseToken( ']' ) ) return false; } } while( oldConsumed != m_consumedTokens ); textureMap->setMapValues( mapValues ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePigmentMap( PMPigmentMap* pigmentMap ) { int oldConsumed; double f_number1; PMPigment* pigment; TQValueList<double> mapValues; if( !parseToken( PIGMENT_MAP_TOK, "pigment_map" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !pigmentMap->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; if( m_token == '[' ) { nextToken( ); if( !parseFloat( f_number1 ) ) return false; mapValues.append( f_number1 ); pigment = new PMPigment( m_pPart ); parsePigment( pigment, false ); if( !insertChild( pigment, pigmentMap ) ) delete pigment; if( !parseToken( ']' ) ) return false; } } while( oldConsumed != m_consumedTokens ); pigmentMap->setMapValues( mapValues ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseNormalMap( PMNormalMap* normalMap ) { int oldConsumed; double f_number1; PMNormal* normal; TQValueList<double> mapValues; if( !parseToken( NORMAL_MAP_TOK, "normal_map" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !normalMap->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; // If we find '}' no need to search for an entry if( m_token != '}' && parseToken( '[' ) ) { if( !parseFloat( f_number1 ) ) return false; mapValues.append( f_number1 ); normal = new PMNormal( m_pPart ); if( !parseNormal( normal ) ) { delete normal; return false; } if( !insertChild( normal, normalMap ) ) delete normal; if( !parseToken( ']' ) ) return false; } } while( oldConsumed != m_consumedTokens ); normalMap->setMapValues( mapValues ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseBumpMap( PMBumpMap* bumpMap ) { int oldConsumed; int i_number; double f_number; if( !parseToken( BUMP_MAP_TOK, "bump_map" ) ) return false; if( !parseToken( '{' ) ) return false; // Parse the bitmap type if( m_token != STRING_TOK ) { switch( m_token ) { case GIF_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapGif ); nextToken( ); break; case TGA_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapTga ); nextToken( ); break; case IFF_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapIff ); nextToken( ); break; case PPM_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapPpm ); nextToken( ); break; case PGM_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapPgm ); nextToken( ); break; case PNG_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapPng ); nextToken( ); break; case SYS_TOK: bumpMap->setBitmapType( PMBumpMap::BitmapSys ); nextToken( ); break; default: printError( i18n( "Unknown bitmap type" ) ); return false; } } // Parse the bitmap file name if( m_token != STRING_TOK ) { printError( i18n( "Expecting a file name." ) ); return false; } else { bumpMap->setBitmapFileName( m_pScanner->sValue( ) ); nextToken( ); } do { oldConsumed = m_consumedTokens; switch( m_token ) { case ONCE_TOK: nextToken( ); bumpMap->enableOnce( true ); break; case MAP_TYPE_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; switch( i_number ) { case 0: bumpMap->setMapType( PMBumpMap::MapPlanar ); break; case 1: bumpMap->setMapType( PMBumpMap::MapSpherical ); break; case 2: bumpMap->setMapType( PMBumpMap::MapCylindrical ); break; case 5: bumpMap->setMapType( PMBumpMap::MapToroidal ); break; } break; case INTERPOLATE_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; switch( i_number ) { case 2: bumpMap->setInterpolateType( PMBumpMap::InterpolateBilinear ); break; case 4: bumpMap->setInterpolateType( PMBumpMap::InterpolateNormalized ); break; } break; case USE_INDEX_TOK: nextToken( ); bumpMap->enableUseIndex( true ); break; case BUMP_SIZE_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; bumpMap->setBumpSize( f_number ); break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseMaterialMap( PMMaterialMap* materialMap ) { int oldConsumed; int i_number; if( !parseToken( MATERIAL_MAP_TOK, "material_map" ) ) return false; if( !parseToken( '{' ) ) return false; // Parse the bitmap type if( m_token != STRING_TOK ) { switch( m_token ) { case GIF_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapGif ); nextToken( ); break; case TGA_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapTga ); nextToken( ); break; case IFF_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapIff ); nextToken( ); break; case PPM_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapPpm ); nextToken( ); break; case PGM_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapPgm ); nextToken( ); break; case PNG_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapPng ); nextToken( ); break; case SYS_TOK: materialMap->setBitmapType( PMMaterialMap::BitmapSys ); nextToken( ); break; default: printError( i18n( "Unknown bitmap type" ) ); return false; } } // Parse the bitmap file name if( m_token != STRING_TOK ) { printError( i18n( "Expecting a file name." ) ); return false; } else { materialMap->setBitmapFileName( m_pScanner->sValue( ) ); nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( materialMap ); switch( m_token ) { case ONCE_TOK: nextToken( ); materialMap->enableOnce( true ); break; case MAP_TYPE_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; switch( i_number ) { case 0: materialMap->setMapType( PMMaterialMap::MapPlanar ); break; case 1: materialMap->setMapType( PMMaterialMap::MapSpherical ); break; case 2: materialMap->setMapType( PMMaterialMap::MapCylindrical ); break; case 5: materialMap->setMapType( PMMaterialMap::MapToroidal ); break; } break; case INTERPOLATE_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; switch( i_number ) { case 2: materialMap->setInterpolateType( PMMaterialMap::InterpolateBilinear ); break; case 4: materialMap->setInterpolateType( PMMaterialMap::InterpolateNormalized ); break; } break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSlopeMap( PMSlopeMap* slopeMap ) { int oldConsumed; double f_number1; PMSlope* slope; TQValueList<double> mapValues; if( !parseToken( SLOPE_MAP_TOK, "slope_map" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !slopeMap->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; // If we find '}' no need to search for an entry if( m_token != '}' && parseToken( '[' ) ) { if( !parseFloat( f_number1 ) ) return false; mapValues.append( f_number1 ); slope = new PMSlope( m_pPart ); if( !parseSlope( slope ) ) { delete slope; return false; } if( !insertChild( slope, slopeMap ) ) delete slope; if( !parseToken( ']' ) ) return false; } } while( oldConsumed != m_consumedTokens ); slopeMap->setMapValues( mapValues ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseDensityMap( PMDensityMap* densityMap ) { int oldConsumed; double f_number1; PMDensity* density; TQValueList<double> mapValues; if( !parseToken( DENSITY_MAP_TOK, "density_map" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !densityMap->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; // If we find '}' no need to search for an entry if( m_token != '}' && parseToken( '[' ) ) { if( !parseFloat( f_number1 ) ) return false; mapValues.append( f_number1 ); density = new PMDensity( m_pPart ); if( !parseDensity( density ) ) { delete density; return false; } if( !insertChild( density, densityMap ) ) delete density; if( !parseToken( ']' ) ) return false; } } while( oldConsumed != m_consumedTokens ); densityMap->setMapValues( mapValues ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseImageMap( PMImageMap* imageMap ) { int oldConsumed; int i_number; double f_number; PMPaletteValue newPaletteValue; TQValueList<PMPaletteValue> l_valuesFilter; TQValueList<PMPaletteValue> l_valuesTransmit; if( !parseToken( IMAGE_MAP_TOK, "image_map" ) ) return false; if( !parseToken( '{' ) ) return false; // Parse the bitmap type if( m_token != STRING_TOK ) { switch( m_token ) { case GIF_TOK: imageMap->setBitmapType( PMImageMap::BitmapGif ); nextToken( ); break; case TGA_TOK: imageMap->setBitmapType( PMImageMap::BitmapTga ); nextToken( ); break; case IFF_TOK: imageMap->setBitmapType( PMImageMap::BitmapIff ); nextToken( ); break; case PPM_TOK: imageMap->setBitmapType( PMImageMap::BitmapPpm ); nextToken( ); break; case PGM_TOK: imageMap->setBitmapType( PMImageMap::BitmapPgm ); nextToken( ); break; case PNG_TOK: imageMap->setBitmapType( PMImageMap::BitmapPng ); nextToken( ); break; case SYS_TOK: imageMap->setBitmapType( PMImageMap::BitmapSys ); nextToken( ); break; default: printError( i18n( "Unknown bitmap type" ) ); return false; } } // Parse the bitmap file name if( m_token != STRING_TOK ) { printError( i18n( "Expecting a file name." ) ); return false; } else { imageMap->setBitmapFileName( m_pScanner->sValue( ) ); nextToken( ); } do { oldConsumed = m_consumedTokens; switch( m_token ) { case TRANSMIT_TOK: nextToken( ); if( m_token == ALL_TOK ) { nextToken( ); if( !parseFloat( f_number ) ) return false; imageMap->enableTransmitAll( true ); imageMap->setTransmitAll( f_number ); } else { if( !parseInt( i_number ) ) return false; parseToken( ',' ); if( !parseFloat( f_number ) ) return false; newPaletteValue.setIndex( i_number ); newPaletteValue.setValue( f_number ); l_valuesTransmit.append( newPaletteValue ); } break; case FILTER_TOK: nextToken( ); if( m_token == ALL_TOK ) { nextToken( ); if( !parseFloat( f_number ) ) return false; imageMap->enableFilterAll( true ); imageMap->setFilterAll( f_number ); } else { if( !parseInt( i_number ) ) return false; parseToken( ',' ); if( !parseFloat( f_number ) ) return false; newPaletteValue.setIndex( i_number ); newPaletteValue.setValue( f_number ); l_valuesFilter.append( newPaletteValue ); } break; case ONCE_TOK: nextToken( ); imageMap->enableOnce( true ); break; case MAP_TYPE_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; switch( i_number ) { case 0: imageMap->setMapType( PMImageMap::MapPlanar ); break; case 1: imageMap->setMapType( PMImageMap::MapSpherical ); break; case 2: imageMap->setMapType( PMImageMap::MapCylindrical ); break; case 5: imageMap->setMapType( PMImageMap::MapToroidal ); break; } break; case INTERPOLATE_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; switch( i_number ) { case 2: imageMap->setInterpolateType( PMImageMap::InterpolateBilinear ); break; case 4: imageMap->setInterpolateType( PMImageMap::InterpolateNormalized ); break; } break; default: break; } } while( oldConsumed != m_consumedTokens ); imageMap->setFilters( l_valuesFilter ); imageMap->setTransmits( l_valuesTransmit ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePigmentList( PMPigmentList* pigmentList, int expectedItems ) { int oldConsumed; PMPigment* pigment; do { oldConsumed = m_consumedTokens; pigment = new PMPigment( m_pPart ); if( !parsePigment( pigment ) ) { delete pigment; return false; } if( !insertChild( pigment, pigmentList ) ) delete pigment; // In the last entry don't expect a comma if( expectedItems-- ) if( m_token == ',' ) nextToken( ); } while( oldConsumed != m_consumedTokens && expectedItems ); return true; } bool PMPovrayParser::parseColorList( PMColorList* colorList, int expectedItems ) { int oldConsumed; PMColor color; PMSolidColor* sc; do { oldConsumed = m_consumedTokens; if( !parseColor( color ) ) { return false; } sc = new PMSolidColor( m_pPart ); sc->setColor( color ); if( !insertChild( sc, colorList ) ) delete sc; // In the last entry don't expect a comma if( expectedItems-- ) if( m_token == ',' ) nextToken( ); } while( oldConsumed != m_consumedTokens && expectedItems ); return true; } bool PMPovrayParser::parseNormalList( PMNormalList* normalList, int expectedItems ) { int oldConsumed; PMNormal* normal; do { oldConsumed = m_consumedTokens; normal = new PMNormal( m_pPart ); if( !parseNormal( normal ) ) { delete normal; return false; } if( !insertChild( normal, normalList ) ) delete normal; // In the last entry don't expect a comma if( expectedItems-- ) if( m_token == ',' ) nextToken( ); } while( oldConsumed != m_consumedTokens && expectedItems ); return true; } bool PMPovrayParser::parseTextureList( PMTextureList* textureList, int expectedItems ) { int oldConsumed; PMTexture* texture; do { oldConsumed = m_consumedTokens; texture = new PMTexture( m_pPart ); if( !parseTexture( texture ) ) { delete texture; return false; } if( !insertChild( texture, textureList ) ) delete texture; // In the last entry don't expect a comma if( expectedItems-- ) if( m_token == ',' ) nextToken( ); } while( oldConsumed != m_consumedTokens && expectedItems ); return true; } bool PMPovrayParser::parseDensityList( PMDensityList* densityList, int expectedItems ) { int oldConsumed; PMDensity* density; do { oldConsumed = m_consumedTokens; density = new PMDensity( m_pPart ); if( !parseDensity( density ) ) { delete density; return false; } if( !insertChild( density, densityList ) ) delete density; // In the last entry don't expect a comma if( expectedItems-- ) if( m_token == ',' ) nextToken( ); } while( oldConsumed != m_consumedTokens && expectedItems ); return true; } bool PMPovrayParser::parseColorMap( PMColorMap* colorMap ) { int oldConsumed; double f_number1, f_number2; PMColor color1, color2; PMSolidColor* solidColor; PMSolidColor* lastColor = 0; TQValueList<double> mapValues; bool newEntry; bool twoColors; if( m_token != COLOR_MAP_TOK && m_token != COLOUR_MAP_TOK ) return false; nextToken( ); if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !colorMap->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; if( m_token == '[' ) { nextToken( ); if( !parseFloat( f_number1 ) ) return false; twoColors = false; if( m_token == ',' ) { twoColors = true; nextToken( ); } else if( ( m_token == INTEGER_TOK ) || ( m_token == FLOAT_TOK ) ) twoColors = true; if( twoColors ) { // Two colors in the same entry if( parseFloat( f_number2 ) ) { if( !parseColor( color1 ) ) return false; if( !parseColor( color2 ) ) return false; // If the first value doesn't pick up from the previous, // or the color is different... newEntry = true; if( lastColor && !mapValues.isEmpty( ) ) if( ( mapValues.last( ) == f_number1 ) && ( lastColor->color( ) == color1 ) ) newEntry = false; if( newEntry ) { // ... add the two colors in two different entries ... mapValues.append( f_number1 ); solidColor = new PMSolidColor( m_pPart ); solidColor->setColor( color1 ); if( !insertChild( solidColor, colorMap ) ) delete solidColor; else lastColor = solidColor; mapValues.append( f_number2 ); solidColor = new PMSolidColor( m_pPart ); solidColor->setColor( color2 ); if( !insertChild( solidColor, colorMap ) ) delete solidColor; else lastColor = solidColor; } else { // ... else just add the last value and color mapValues.append( f_number2 ); solidColor = new PMSolidColor( m_pPart ); solidColor->setColor( color2 ); if( !insertChild( solidColor, colorMap ) ) delete solidColor; else lastColor = solidColor; } } } else { // Only one color in the entry if( !parseColor( color1 ) ) return false; mapValues.append( f_number1 ); solidColor = new PMSolidColor( m_pPart ); solidColor->setColor( color1 ); if( !insertChild( solidColor, colorMap ) ) delete solidColor; else lastColor = solidColor; } if( !parseToken( ']' ) ) return false; } } while( oldConsumed != m_consumedTokens ); colorMap->setMapValues( mapValues ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSkySphere( PMSkySphere* sky ) { int oldConsumed; if( !parseToken( SKY_SPHERE_TOK, "sky_sphere" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !sky->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( sky ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseRainbow( PMRainbow* rainbow ) { PMVector vector; double f_number; int oldConsumed; if( !parseToken( RAINBOW_TOK, "rainbow" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !rainbow->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( rainbow ); switch( m_token ) { case DIRECTION_TOK: nextToken( ); if( parseVector( vector ) ) { rainbow->enableDirection( true ); rainbow->setDirection( vector ); } break; case ANGLE_TOK: nextToken( ); if( parseFloat( f_number ) ) { rainbow->enableAngle( true ); rainbow->setAngle( f_number ); } break; case WIDTH_TOK: nextToken( ); if( parseFloat( f_number ) ) { rainbow->enableWidth( true ); rainbow->setWidth( f_number ); } break; case DISTANCE_TOK: nextToken( ); if( parseFloat( f_number ) ) { rainbow->enableDistance( true ); rainbow->setDistance( f_number ); } break; case JITTER_TOK: nextToken( ); if( parseFloat( f_number ) ) { rainbow->enableJitter( true ); rainbow->setJitter( f_number ); } break; case UP_TOK: nextToken( ); if( parseVector( vector ) ) { rainbow->enableUp( true ); rainbow->setUp( vector ); } break; case ARC_ANGLE_TOK: nextToken( ); if( parseFloat( f_number ) ) { rainbow->enableArcAngle( true ); rainbow->setArcAngle( f_number ); } break; case FALLOFF_ANGLE_TOK: nextToken( ); if( parseFloat( f_number ) ) { rainbow->enableFalloffAngle( true ); rainbow->setFalloffAngle( f_number ); } break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseFog( PMFog* fog ) { PMColor color; PMVector vector; double f_number; int i_number; int fog_type; int oldConsumed; if( !parseToken( FOG_TOK, "fog" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !fog->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } fog_type = 1; if( parseToken( FOG_TYPE_TOK, "fog_type" ) ) { if( !parseInt( i_number ) ) return false; fog_type = i_number; } do { oldConsumed = m_consumedTokens; switch( m_token ) { case DISTANCE_TOK: nextToken( ); if( parseFloat( f_number ) ) fog->setDistance( f_number ); break; case '<': case COLOR_TOK: case COLOUR_TOK: case RGB_TOK: case RGBT_TOK: case RGBF_TOK: case RGBFT_TOK: case RED_TOK: case GREEN_TOK: case BLUE_TOK: case TRANSMIT_TOK: case FILTER_TOK: case ID_TOK: if( parseColor( color ) ) fog->setColor( color ); break; case TURBULENCE_TOK: nextToken( ); fog->enableTurbulence( true ); if( !parseVector( vector ) ) return false; fog->setValueVector( vector ); break; case OCTAVES_TOK: nextToken( ); if( !parseInt( i_number ) ) return false; fog->setOctaves( i_number ); break; case OMEGA_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; fog->setOmega( f_number ); break; case LAMBDA_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; fog->setLambda( f_number ); break; case TURB_DEPTH_TOK: nextToken( ); if( !parseFloat( f_number ) ) return false; fog->setDepth( f_number ); break; case FOG_OFFSET_TOK: nextToken( ); fog_type = 2; if( parseFloat( f_number ) ) fog->setFogOffset( f_number ); break; case FOG_ALT_TOK: nextToken( ); fog_type = 2; if( parseFloat( f_number ) ) fog->setFogAlt( f_number ); break; case UP_TOK: nextToken( ); fog_type = 2; if( !parseVector( vector ) ) return false; fog->setUp( vector ); break; default: break; } // Only parseChildObjects() if the token is not turbulence, because this // function parses that token. if( m_token != TURBULENCE_TOK ) parseChildObjects( fog ); } while( oldConsumed != m_consumedTokens ); fog->setFogType( fog_type ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseMedia( PMMedia* media ) { PMColor color; double f_number; int i_number; int oldConsumed, oldConsumed1; if( !parseToken( MEDIA_TOK, "media" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !media->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( media ); switch( m_token ) { case METHOD_TOK: nextToken( ); if( parseInt( i_number ) ) media->setMethod( i_number ); break; case INTERVALS_TOK: nextToken( ); if( parseInt( i_number ) ) media->setIntervals( i_number ); break; case SAMPLES_TOK: nextToken( ); if( parseInt( i_number ) ) media->setSamplesMin( i_number ); parseToken( ',' ); if( parseInt( i_number ) ) media->setSamplesMax( i_number ); break; case CONFIDENCE_TOK: nextToken( ); if( parseFloat( f_number ) ) media->setConfidence( f_number ); break; case VARIANCE_TOK: nextToken( ); if( parseFloat( f_number ) ) media->setVariance( f_number ); break; case RATIO_TOK: nextToken( ); if( parseFloat( f_number ) ) media->setRatio( f_number ); break; case AA_LEVEL_TOK: nextToken( ); if ( parseInt( i_number ) ) media->setAALevel( i_number ); break; case AA_THRESHOLD_TOK: nextToken( ); if ( parseFloat( f_number ) ) media->setAAThreshold( f_number ); break; case ABSORPTION_TOK: nextToken( ); if( parseColor( color ) ) { media->enableAbsorption( true ); media->setAbsorption( color ); } break; case EMISSION_TOK: nextToken( ); media->enableEmission( true ); if( parseColor( color ) ) media->setEmission( color ); break; case SCATTERING_TOK: nextToken( ); parseToken( '{' ); media->enableScattering( true ); if( parseInt( i_number ) ) media->setScatteringType( i_number ); parseToken( ',' ); if( parseColor( color ) ) media->setScatteringColor( color ); do { oldConsumed1 = m_consumedTokens; switch( m_token ) { case ECCENTRICITY_TOK: nextToken( ); if( parseFloat( f_number ) ) media->setScatteringEccentricity( f_number ); break; case EXTINCTION_TOK: nextToken( ); if( parseFloat( f_number ) ) media->setScatteringExtinction( f_number ); break; default: break; } } while( oldConsumed1 != m_consumedTokens ); parseToken( '}' ); break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseDensity( PMDensity* density ) { int oldConsumed; if( !parseToken( DENSITY_TOK, "density" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !density->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( density ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseInterior( PMInterior* interior ) { double f_number; int i_number; int oldConsumed; if( !parseToken( INTERIOR_TOK, "interior" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !interior->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( interior ); switch( m_token ) { case IOR_TOK: nextToken( ); if( parseFloat( f_number ) ) { interior->enableIor( true ); interior->setIor( f_number ); } break; case CAUSTICS_TOK: nextToken( ); if( parseFloat( f_number ) ) { interior->enableCaustics( true ); interior->setCaustics( f_number ); } break; case DISPERSION_TOK: nextToken( ); if ( parseFloat( f_number ) ) { interior->enableDispersion( true ); interior->setDispersion( f_number ); } break; case DISPERSION_SAMPLES_TOK: nextToken( ); if ( parseInt( i_number ) ) { interior->enableDispSamples( true ); interior->setDispSamples( i_number ); } break; case FADE_DISTANCE_TOK: nextToken( ); if( parseFloat( f_number ) ) { interior->enableFadeDistance( true ); interior->setFadeDistance( f_number ); } break; case FADE_POWER_TOK: nextToken( ); if( parseFloat( f_number ) ) { interior->enableFadePower( true ); interior->setFadePower( f_number ); } break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseMaterial( PMMaterial* material ) { int oldConsumed; if( !parseToken( MATERIAL_TOK, "material" ) ) return false; if( !parseToken( '{' ) ) return false; if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !material->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } do { oldConsumed = m_consumedTokens; parseChildObjects( material ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSlope( PMSlope* slope ) { double f_number; if( !parseToken( '<' ) ) return false; if( !parseFloat( f_number ) ) return false; slope->setHeight( f_number ); if( !parseToken( ',' ) ) return false; if( !parseFloat( f_number ) ) return false; slope->setSlope( f_number ); if( !parseToken( '>' ) ) return false; return true; } bool PMPovrayParser::parseGlobalSettings( PMGlobalSettings* globalsettings ) { PMColor color; double f_number; int i_number; int oldConsumed; // Initial global settings tokens if( !parseToken( GLOBAL_SETTINGS_TOK, "global_settings" ) ) return false; if( !parseToken( '{' ) ) return false; // Parse global settings tokens do { oldConsumed = m_consumedTokens; parseChildObjects( globalsettings ); switch( m_token ) { case ADC_BAILOUT_TOK: nextToken( ); if( parseFloat( f_number ) ) globalsettings->setAdcBailout( f_number ); break; case AMBIENT_LIGHT_TOK: nextToken( ); if( parseColor( color ) ) globalsettings->setAmbientLight( color ); break; case ASSUMED_GAMMA_TOK: nextToken( ); if( parseFloat( f_number ) ) globalsettings->setAssumedGamma( f_number ); break; case HF_GRAY_16_TOK: nextToken( ); switch( m_token ) { case ON_TOK: globalsettings->setHfGray16( true ); nextToken( ); break; case OFF_TOK: globalsettings->setHfGray16( false ); nextToken( ); break; default: break; } break; case IRID_WAVELENGTH_TOK: nextToken( ); if( parseColor( color ) ) globalsettings->setIridWaveLength( color ); break; case MAX_INTERSECTIONS_TOK: nextToken( ); if( parseInt( i_number ) ) globalsettings->setMaxIntersections( i_number ); break; case MAX_TRACE_LEVEL_TOK: nextToken( ); if( parseInt( i_number ) ) globalsettings->setMaxTraceLevel( i_number ); break; case NUMBER_OF_WAVES_TOK: nextToken( ); if( parseInt( i_number ) ) globalsettings->setNumberWaves( i_number ); break; case NOISE_GENERATOR_TOK: nextToken( ); if ( parseInt( i_number ) ) globalsettings->setNoiseGenerator( ( PMGlobalSettings::PMNoiseType ) ( i_number - 1 ) ); break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseFinish( PMFinish* finish ) { PMColor color; double f_number; int oldConsumed, oldConsumed1; // Initial finish tokens "finish {" if( !parseToken( FINISH_TOK, "finish" ) ) return false; if( !parseToken( '{' ) ) return false; // Parse a possible declare link identifier if( m_token == ID_TOK ) { TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !finish->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); } // Parse finish tokens do { oldConsumed = m_consumedTokens; switch( m_token ) { case AMBIENT_TOK: nextToken( ); finish->enableAmbient( true ); if( parseColor( color ) ) finish->setAmbientColor( color ); break; case DIFFUSE_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableDiffuse( true ); finish->setDiffuse( f_number ); } break; case BRILLIANCE_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableBrilliance( true ); finish->setBrilliance( f_number ); } break; case PHONG_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enablePhong( true ); finish->setPhong( f_number ); } break; case PHONG_SIZE_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enablePhongSize( true ); finish->setPhongSize( f_number ); } break; case METALLIC_TOK: nextToken( ); finish->enableMetallic( true ); finish->setMetallic( 1.0 ); if( parseFloat( f_number, true ) ) finish->setMetallic( f_number ); break; case SPECULAR_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableSpecular( true ); finish->setSpecular( f_number ); } break; case ROUGHNESS_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableRoughness( true ); finish->setRoughness( f_number ); } break; case CRAND_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableCrand( true ); finish->setCrand( f_number ); } break; case CONSERVE_ENERGY_TOK: nextToken( ); finish->setConserveEnergy( parseBool( ) ); break; case REFLECTION_TOK: nextToken( ); finish->enableReflection( true ); if( !parseToken( '{' ) ) { printError( i18n( "Using Old Reflection Syntax" ) ); if( parseColor( color ) ) finish->setReflectionColor( color ); } else if( parseColor( color ) ) { if( parseToken( ',' ) ) { finish->enableReflectionMin( true ); finish->setReflectionMinColor( color ); if( parseColor( color ) ) finish->setReflectionColor( color ); else return false; } else finish->setReflectionColor( color ); do { oldConsumed1 = m_consumedTokens; switch( m_token ) { case FRESNEL_TOK: nextToken( ); finish->setReflectionFresnel( parseBool( ) ); break; case FALLOFF_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableRefFalloff( true ); finish->setReflectionFalloff( f_number ); } break; case EXPONENT_TOK: nextToken( ); if( parseFloat( f_number ) ) { finish->enableRefExponent( true ); finish->setReflectionExponent( f_number ); } break; case METALLIC_TOK: nextToken( ); if ( parseFloat( f_number ) ) { finish->enableRefMetallic( true ); finish->setReflectionMetallic( f_number ); } break; default: break; } } while( oldConsumed1 != m_consumedTokens ); parseToken( '}' ); } else return false; break; case REFLECTION_EXPONENT_TOK: nextToken( ); if ( parseFloat( f_number ) ) { finish->enableRefExponent( true ); finish->setReflectionExponent( f_number ); } break; case IRID_TOK: nextToken( ); parseToken( '{' ); finish->setIrid( true ); if( parseFloat( f_number ) ) finish->setIridAmount( f_number ); do { oldConsumed1 = m_consumedTokens; switch( m_token ) { case THICKNESS_TOK: nextToken( ); if( parseFloat( f_number ) ) finish->setIridThickness( f_number ); break; case TURBULENCE_TOK: nextToken( ); if( parseFloat( f_number ) ) finish->setIridTurbulence( f_number ); break; default: break; } } while( oldConsumed1 != m_consumedTokens ); parseToken( '}' ); break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseDeclare( PMDeclare* decl ) { PMObject* child = 0; PMTexture* texture = 0; bool error = false; switch( m_token ) { case OBJECT_TOK: error = !parseObject( decl ); break; // finite solid case BLOB_TOK: child = new PMBlob( m_pPart ); error = !parseBlob( ( PMBlob* ) child ); break; case BOX_TOK: child = new PMBox( m_pPart ); error = !parseBox( ( PMBox* ) child ); break; case CONE_TOK: child = new PMCone( m_pPart ); error = !parseCone( ( PMCone* ) child ); break; case CYLINDER_TOK: child = new PMCylinder( m_pPart ); error = !parseCylinder( ( PMCylinder* ) child ); break; case HEIGHT_FIELD_TOK: child = new PMHeightField( m_pPart ); error = !parseHeightField( ( PMHeightField* ) child ); break; case JULIA_FRACTAL_TOK: child = new PMJuliaFractal( m_pPart ); error = !parseJuliaFractal( ( PMJuliaFractal* ) child ); break; case LATHE_TOK: child = new PMLathe( m_pPart ); error = !parseLathe( ( PMLathe* ) child ); break; case PRISM_TOK: child = new PMPrism( m_pPart ); error = !parsePrism( ( PMPrism* ) child ); break; case SPHERE_TOK: child = new PMSphere( m_pPart ); error = !parseSphere( ( PMSphere* ) child ); break; case SUPERELLIPSOID_TOK: child = new PMSuperquadricEllipsoid( m_pPart ); error = !parseSqe( ( PMSuperquadricEllipsoid* ) child ); break; case SOR_TOK: child = new PMSurfaceOfRevolution( m_pPart ); error = !parseSor( ( PMSurfaceOfRevolution* ) child ); break; case TEXT_TOK: child = new PMText( m_pPart ); error = !parseText( ( PMText* ) child ); break; case TORUS_TOK: child = new PMTorus( m_pPart ); error = !parseTorus( ( PMTorus* ) child ); break; // finite patch case BICUBIC_PATCH_TOK: child = new PMBicubicPatch( m_pPart ); error = !parseBicubicPatch( ( PMBicubicPatch* ) child ); break; case DISC_TOK: child = new PMDisc( m_pPart ); error = !parseDisc( ( PMDisc* ) child ); break; case TRIANGLE_TOK: case SMOOTH_TRIANGLE_TOK: child = new PMTriangle( m_pPart ); error = !parseTriangle( ( PMTriangle* ) child ); break; // infinite solid case PLANE_TOK: child = new PMPlane( m_pPart ); error = !parsePlane( ( PMPlane* ) child ); break; case TQUADRIC_TOK: case CUBIC_TOK: case TQUARTIC_TOK: case POLY_TOK: child = new PMPolynom( m_pPart ); error = !parsePolynom( ( PMPolynom* ) child ); break; // csg case UNION_TOK: case DIFFERENCE_TOK: case INTERSECTION_TOK: case MERGE_TOK: child = new PMCSG( m_pPart ); error = !parseCSG( ( PMCSG* ) child ); break; // textures case TEXTURE_TOK: while( m_token == TEXTURE_TOK ) { texture = new PMTexture( m_pPart ); if( !parseTexture( texture ) ) error = true; if( !insertChild( texture, decl ) ) { delete texture; texture = 0; } } break; case PIGMENT_TOK: child = new PMPigment( m_pPart ); error = !parsePigment( ( PMPigment* ) child ); break; case NORMAL_TOK: child = new PMNormal( m_pPart ); error = !parseNormal( ( PMNormal* ) child ); break; case FINISH_TOK: child = new PMFinish( m_pPart ); error = !parseFinish( ( PMFinish* ) child ); break; case TEXTURE_MAP_TOK: child = new PMTextureMap( m_pPart ); error = !parseTextureMap( ( PMTextureMap* ) child ); break; case PIGMENT_MAP_TOK: child = new PMPigmentMap( m_pPart ); error = !parsePigmentMap( ( PMPigmentMap* ) child ); break; case COLOR_MAP_TOK: case COLOUR_MAP_TOK: child = new PMColorMap( m_pPart ); error = !parseColorMap( ( PMColorMap* ) child ); break; case NORMAL_MAP_TOK: child = new PMNormalMap( m_pPart ); error = !parseNormalMap( ( PMNormalMap* ) child ); break; case SLOPE_MAP_TOK: child = new PMSlopeMap( m_pPart ); error = !parseSlopeMap( ( PMSlopeMap* ) child ); break; case DENSITY_MAP_TOK: child = new PMDensityMap( m_pPart ); error = !parseDensityMap( ( PMDensityMap* ) child ); break; case INTERIOR_TOK: child = new PMInterior( m_pPart ); error = !parseInterior( ( PMInterior* ) child ); break; case MEDIA_TOK: child = new PMMedia( m_pPart ); error = !parseMedia( ( PMMedia* ) child ); break; case DENSITY_TOK: child = new PMDensity( m_pPart ); error = !parseDensity( ( PMDensity* ) child ); break; case MATERIAL_TOK: child = new PMMaterial( m_pPart ); error = !parseMaterial( ( PMMaterial* ) child ); break; case SKY_SPHERE_TOK: child = new PMSkySphere( m_pPart ); error = !parseSkySphere( ( PMSkySphere* ) child ); break; case RAINBOW_TOK: child = new PMRainbow( m_pPart ); error = !parseRainbow( ( PMRainbow* ) child ); break; case FOG_TOK: child = new PMFog( m_pPart ); error = !parseFog( ( PMFog* ) child ); break; // misc case LIGHT_SOURCE_TOK: child = new PMLight( m_pPart ); error = !parseLight( ( PMLight* ) child ); break; case ISOSURFACE_TOK: child = new PMIsoSurface( m_pPart ); error = !parseIsoSurface( ( PMIsoSurface* ) child ); break; case PHOTONS_TOK: child = new PMPhotons( m_pPart ); error = !parsePhotons( ( PMPhotons* ) child ); break; case LIGHT_GROUP_TOK: child = new PMLightGroup( m_pPart ); error = !parseLightGroup( ( PMLightGroup* ) child ); break; case INTERIOR_TEXTURE_TOK: child = new PMInteriorTexture( m_pPart ); error = !parseInteriorTexture( ( PMInteriorTexture* ) child ); break; case SPHERE_SWEEP_TOK: child = new PMSphereSweep( m_pPart ); error = !parseSphereSweep( ( PMSphereSweep* ) child ); break; case MESH_TOK: child = new PMMesh( m_pPart ); error = !parseMesh( ( PMMesh* ) child ); break; } if( child ) { if( !insertChild( child, decl ) ) { delete child; child = 0; } } return !error; } bool PMPovrayParser::parseObject( PMCompositeObject* parent ) { PMObject* child; bool error = false; if( !parseToken( OBJECT_TOK, "object" ) ) return false; if( parseToken( '{' ) ) { switch( m_token ) { case ID_TOK: child = new PMObjectLink( m_pPart ); error = !parseObjectLink( ( PMObjectLink* ) child ); if( !insertChild( child, parent ) ) delete child; break; default: { PMObject* lastChild = 0; if( parent ) lastChild = parent->lastChild( ); else lastChild = m_pResultList->last( ); error = !parseChildObjects( parent, 1 ); if( !error ) { PMObject* newLast = 0; if( parent ) newLast = parent->lastChild( ); else newLast = m_pResultList->last( ); if( newLast && ( newLast != lastChild ) && newLast->isA( "CompositeObject" ) ) { // one child was parsed // append all following objects error = !parseChildObjects( ( PMCompositeObject* ) newLast ); } else { printError( i18n( "One graphical object expected" ) ); error = true; } } break; } } if( !parseToken( '}' )) error = true; } else error = true; return !error; } bool PMPovrayParser::parseObjectLink( PMObjectLink* link ) { int oldConsumed; if( m_token != ID_TOK ) { printExpected( "identifier", m_pScanner->sValue( ) ); return false; } TQString id( m_pScanner->sValue( ) ); PMDeclare* decl = checkLink( id ); if( decl ) { if( !link->setLinkedObject( decl ) ) printError( i18n( "Wrong declare type" ) ); } nextToken( ); do { oldConsumed = m_consumedTokens; parseChildObjects( link ); parseObjectModifiers( link ); } while( oldConsumed != m_consumedTokens ); return true; } bool PMPovrayParser::parseIsoSurface( PMIsoSurface* iso ) { PMVector vector; double f; int i; int oldConsumed; if( !parseToken( ISOSURFACE_TOK, "isosurface" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; parseChildObjects( iso ); parseObjectModifiers( iso ); switch( m_token ) { case FUNCTION_TOK: nextToken( ); if( m_token != '{' ) { printExpected( '{', m_pScanner->sValue( ) ); return false; } m_pScanner->scanFunction( ); nextToken( ); if( m_token != FUNCTION_TOK ) return false; iso->setFunction( TQString( m_pScanner->sValue( ) ).simplifyWhiteSpace( ) ); nextToken( ); parseToken( '}' ); break; case CONTAINED_BY_TOK: nextToken( ); if( !parseToken( '{' ) ) return false; if( m_token == BOX_TOK ) { iso->setContainedBy( PMIsoSurface::Box ); nextToken( ); parseToken( '{' ); if( parseVector( vector ) ) iso->setCorner1( vector ); parseToken( ',' ); if( parseVector( vector ) ) iso->setCorner2( vector ); if( !parseToken( '}' ) ) return false; } else if( m_token == SPHERE_TOK ) { iso->setContainedBy( PMIsoSurface::Sphere ); nextToken( ); parseToken( '{' ); if( parseVector( vector ) ) iso->setCenter( vector ); parseToken( ',' ); if( parseFloat( f ) ) iso->setRadius( f ); if( !parseToken( '}' ) ) return false; } else { printUnexpected( m_pScanner->sValue( ) ); return false; } if( !parseToken( '}' ) ) return false; break; case THRESHOLD_TOK: nextToken( ); if( parseFloat( f ) ) iso->setThreshold( f ); break; case ACCURACY_TOK: nextToken( ); if( parseFloat( f ) ) iso->setAccuracy( f ); break; case MAX_GRADIENT_TOK: nextToken( ); if( parseFloat( f ) ) iso->setMaxGradient( f ); break; case EVALUATE_TOK: nextToken( ); iso->setEvaluate( true ); if( parseFloat( f ) ) { iso->setEvaluateValue( 0, f ); if( parseToken( ',' ) && parseFloat( f ) ) { iso->setEvaluateValue( 1, f ); if( parseToken( ',' ) && parseFloat( f ) ) iso->setEvaluateValue( 2, f ); } } break; case OPEN_TOK: nextToken( ); iso->setOpen( true ); break; case MAX_TRACE_TOK: nextToken( ); if( parseInt( i ) ) iso->setMaxTrace( i ); break; case ALL_INTERSECTIONS_TOK: nextToken( ); iso->setAllIntersections( true ); break; default: break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseRadiosity( PMRadiosity* rad ) { double f; int i; int oldConsumed; if( !parseToken( RADIOSITY_TOK, "radiosity" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; switch( m_token ) { case ADC_BAILOUT_TOK: nextToken( ); if( parseFloat( f ) ) rad->setAdcBailout( f ); break; case ALWAYS_SAMPLE_TOK: nextToken( ); rad->setAlwaysSample( parseBool( ) ); break; case BRIGHTNESS_TOK: nextToken( ); if( parseFloat( f ) ) rad->setBrightness( f ); break; case COUNT_TOK: nextToken( ); if( parseInt( i ) ) rad->setCount( i ); break; case ERROR_BOUND_TOK: nextToken( ); if( parseFloat( f ) ) rad->setErrorBound( f ); break; case GRAY_THRESHOLD_TOK: nextToken( ); if( parseFloat( f ) ) rad->setGrayThreshold( f ); break; case LOW_ERROR_FACTOR_TOK: nextToken( ); if( parseFloat( f ) ) rad->setLowErrorFactor( f ); break; case MAX_SAMPLE_TOK: nextToken( ); if ( parseFloat( f ) ) rad->setMaxSample( f ); break; case MEDIA_TOK: nextToken( ); rad->setMedia( parseBool( ) ); break; case MINIMUM_REUSE_TOK: nextToken( ); if( parseFloat( f ) ) rad->setMinimumReuse( f ); break; case NEAREST_COUNT_TOK: nextToken( ); if( parseInt( i ) ) rad->setNearestCount( i ); break; case NORMAL_TOK: nextToken( ); rad->setNormal( parseBool( ) ); break; case PRETRACE_START_TOK: nextToken( ); if( parseFloat( f ) ) rad->setPretraceStart( f ); break; case PRETRACE_END_TOK: nextToken( ); if( parseFloat( f ) ) rad->setPretraceEnd( f ); break; case RECURSION_LIMIT_TOK: nextToken( ); if( parseInt( i) ) rad->setRecursionLimit( i ); break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseGlobalPhotons( PMGlobalPhotons* gp ) { double f; int i; int oldConsumed; if( !parseToken( PHOTONS_TOK, "photons" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; switch( m_token ) { case SPACING_TOK: gp->setNumberType( PMGlobalPhotons::Spacing ); nextToken( ); if ( parseFloat( f ) ) gp->setSpacing( f ); break; case COUNT_TOK: gp->setNumberType( PMGlobalPhotons::Count ); nextToken( ); if ( parseInt( i ) ) gp->setCount( i ); break; case GATHER_TOK: nextToken( ); if ( parseInt( i ) ) { gp->setGatherMin( i ); if ( parseToken( ',' ) && parseInt( i ) ) gp->setGatherMax( i ); } break; case MEDIA_TOK: nextToken( ); if ( parseInt( i ) ) { gp->setMediaMaxSteps( i ); if ( parseToken( ',' ) && parseFloat( f ) ) gp->setMediaFactor( f ); } case JITTER_TOK: nextToken( ); if ( parseFloat( f ) ) gp->setJitter( f ); break; case MAX_TRACE_LEVEL_TOK: nextToken( ); gp->setMaxTraceLevelGlobal( false ); if ( parseInt( i ) ) gp->setMaxTraceLevel( i ); break; case ADC_BAILOUT_TOK: nextToken( ); gp->setAdcBailoutGlobal( false ); if ( parseFloat( f ) ) gp->setAdcBailout( f ); break; case AUTOSTOP_TOK: nextToken( ); if ( parseFloat( f ) ) gp->setAutostop( f ); break; case EXPAND_THRESHOLDS_TOK: nextToken( ); if ( parseFloat( f ) ) { gp->setExpandIncrease( f ); if ( parseToken( ',' ) && parseInt( i ) ) gp->setExpandMin( i ); } break; case RADIUS_TOK: nextToken( ); if ( parseFloat( f ) ) { gp->setRadiusGather( f ); if ( parseToken( ',' ) && parseFloat( f ) ) { gp->setRadiusGatherMulti( f ); if ( parseToken( ',' ) && parseFloat( f ) ) { gp->setRadiusMedia( f ); if ( parseToken( ',' ) && parseFloat( f ) ) gp->setRadiusMediaMulti( f ); } } } break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parsePhotons( PMPhotons* p ) { double f; int oldConsumed; if( !parseToken( PHOTONS_TOK, "photons" ) ) return false; if( !parseToken( '{' ) ) return false; p->setTarget( false ); do { oldConsumed = m_consumedTokens; switch( m_token ) { case TARGET_TOK: nextToken( ); p->setTarget( true ); if ( parseFloat( f ) ) p->setSpacingMulti( f ); break; case REFRACTION_TOK: nextToken( ); p->setRefraction( parseBool( ) ); break; case REFLECTION_TOK: nextToken( ); p->setReflection( parseBool( ) ); break; case COLLECT_TOK: nextToken( ); p->setCollect( parseBool( ) ); break; case PASS_THROUGH_TOK: nextToken( ); p->setPassThrough( parseBool( ) ); break; case AREA_LIGHT_TOK: nextToken( ); p->setAreaLight( parseBool( ) ); break; } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseLightGroup( PMLightGroup* lg ) { int oldConsumed; if ( !parseToken( LIGHT_GROUP_TOK, "light_group" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; if ( m_token == GLOBAL_LIGHTS_TOK ) { nextToken( ); lg->setGlobalLights( parseBool( ) ); } else { parseChildObjects( lg ); parseObjectModifiers( lg ); } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseInteriorTexture( PMInteriorTexture* it ) { int oldConsumed; if( !parseToken( INTERIOR_TEXTURE_TOK, "interior_texture" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; parseChildObjects( it ); } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseSphereSweep( PMSphereSweep* ss ) { int oldConsumed, numspheres; TQValueList<PMVector> points; TQValueList<double> radii; PMVector point; double f; if( !parseToken( SPHERE_SWEEP_TOK, "sphere_sweep" ) ) return false; if( !parseToken( '{' ) ) return false; nextToken( ); switch ( m_token ) { case LINEAR_SPLINE_TOK: ss->setSplineType( PMSphereSweep::LinearSpline ); break; case B_SPLINE_TOK: ss->setSplineType( PMSphereSweep::BSpline ); break; case CUBIC_SPLINE_TOK: ss->setSplineType( PMSphereSweep::CubicSpline ); break; default: return false; } if ( !parseInt( numspheres ) ) return false; for ( int i = 0; i < numspheres; ++i ) { if ( !parseVector( point ) ) return false; points.append( point ); if ( !parseToken( ',' ) ) return false; if ( !parseFloat( f ) ) return false; radii.append( f ); } ss->setPoints( points ); ss->setRadii( radii ); do { oldConsumed = m_consumedTokens; if ( m_token == TOLERANCE_TOK ) { nextToken( ); if ( !parseFloat( f ) ) return false; ss->setTolerance( f ); } else { parseObjectModifiers( ss ); } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; } bool PMPovrayParser::parseMesh( PMMesh* m ) { int oldConsumed; PMVector vector; if( !parseToken( MESH_TOK, "mesh" ) ) return false; if( !parseToken( '{' ) ) return false; do { oldConsumed = m_consumedTokens; if ( m_token == HIERARCHY_TOK ) { nextToken( ); m->setHierarchy( parseBool( ) ); } else if ( m_token == INSIDE_VECTOR_TOK ) { nextToken( ); if ( !parseVector( vector ) ) return false; m->enableInsideVector( true ); m->setInsideVector( vector ); } else { parseChildObjects( m ); parseObjectModifiers( m ); } } while( oldConsumed != m_consumedTokens ); if( !parseToken( '}' ) ) return false; return true; }