core/gdlhandler.cpp

Go to the documentation of this file.

/******************************************************************************
 * This file is part of the Gluon Development Platform
 * Copyright (c) 2009 Dan Leinir Turthra Jensen <admin@leinir.dk>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 */
#include "gdlhandler.h"

#include "gluonobject.h"
#include "gluonobjectfactory.h"
#include "debughelper.h"

#include <QtCore/QStringList>

using namespace GluonCore;

template<> GDLHandler* Singleton<GDLHandler>::m_instance = 0;

GDLHandler::GDLHandler()
{
}

GDLHandler::~GDLHandler()
{
}

GluonObject *
GDLHandler::instantiateObject( QString className )
{
    GluonObject* newObject = GluonObjectFactory::instance()->instantiateObjectByName( className );
    if( !newObject )
        newObject = new GluonObject();

    return newObject;
}

GluonObject *
GDLHandler::createObject( QStringList objectStringList, QObject* parent )
{
    DEBUG_BLOCK
    GluonObject* createdObject = 0;
    int index = 0;
    QString currentPropertyName;
    foreach( const QString & item, objectStringList )
    {
        switch( index )
        {
            case 0:
                // Object type
                createdObject = instantiateObject( item );
                createdObject->setParent( parent );
                //DEBUG_TEXT(QString("Instantiated object of type %1").arg(createdObject->metaObject()->className()));
                break;
            case 1:
                // Object name
                createdObject->setName( item );
                break;
            default:
                // Everything else
                if( currentPropertyName.isEmpty() )
                {
                    if( item.startsWith( '{' ) )
                    {
                        // Items are parented automatically - see case 0 above
                        QList<GluonObject*> childList = parseGDL( item, createdObject );
                    }
                    else
                    {
                        currentPropertyName = item;
                    }
                }
                else
                {
                    // Set the property with the current string as the value, and finally clear the property name
                    createdObject->setPropertyFromString( currentPropertyName, item );
                    currentPropertyName.clear();
                }
                break;
        }
        ++index;
    }
    return createdObject;
}

QList<QStringList>
GDLHandler::tokenizeObject( QString objectString )
{
    QList<QStringList> tokenizedObject;

    bool inItem = false;
    bool inObjectDefinition = false;
    bool inObjectName = false;
    bool inObjectType = false;

    bool inPropertyName = false;
    bool inPropertyValue = false;
    bool multilineProperty = false;
    bool inChild = false;
    bool childEnded = false;

    bool beingEscaped = false;
    int extraBracketCounter = 0;
    QString currentString;
    QStringList currentItem;

    QString::const_iterator i;
    for( i = objectString.begin(); i != objectString.end(); ++i )
    {
        if( !inItem )
        {
            if( i->isSpace() )
            {
                // Just do nothing - whitespace should be ignored outside of items
            }
            else if( i->toLower() == '{' )
            {
                inItem = true;
            }
        }
        else
        {
            if( !inPropertyValue && !inPropertyName && !inChild && !inObjectDefinition )
            {
                if( !currentString.isEmpty() )
                {
                    currentItem.append( currentString.trimmed() );
                    currentString.clear();
                }

                // Ignore whitespace as instructed, rar!
                if( !i->isSpace() && (*i) != '#' )
                {
                    if( i->toLower() == '}' )
                    {
                        // Once we hit an end, we should stop looking at this item
                        // In other words - add the item to the list of items and make a new stringlist to work on...
                        QStringList theItem( currentItem );
                        tokenizedObject.append( theItem );
                        currentItem.clear();
                    }
                    else if( i->toLower() == '{' )
                    {
                        // If we hit a start while already inside an item, we should simply start adding stuff
                        // until we hit the correct ending again
                        inChild = true;
                    }
                    else
                    {
                        // Once you hit something, start reading the object definition
                        inObjectDefinition = true;
                    }
                }
            }

            if( inObjectDefinition )
            {
                if( !inPropertyName && !inObjectName && !inObjectType )
                {
                    // Ignore spaces between the start { and the object type
                    if( !i->isSpace() )
                        inObjectType = true;
                }

                if( inObjectType )
                {
                    if( i->toLower() == '(' )
                    {
                        currentItem.append( currentString.trimmed() );
                        currentString.clear();
                        inObjectType = false;
                        inObjectName = true;
                    }
                    else
                    {
                        currentString += i->unicode();
                    }
                }
                else if( inObjectName )
                {
                    if( i->toLower() == ')' )
                    {
                        currentItem.append( currentString.trimmed() );
                        currentString.clear();
                        inObjectName = false;
                        inPropertyName = true;
                    }
                    else
                    {
                        currentString += i->unicode();
                    }
                }
                else if( inPropertyName )
                {
                    if( !i->isSpace() )
                        inObjectDefinition = false;
                }
            }
            else if( inChild )
            {
                if( childEnded )
                {
                    if( !i->isSpace() )
                    {
                        inChild = false;
                    }
                }
                else
                {
                    if( i->toLower() == '\\' && !beingEscaped )
                    {
                        beingEscaped = true;
                    }
                    else
                    {
                        currentString += i->unicode();
                        if( !beingEscaped )
                        {
                            if( i->toLower() == '{' )
                            {
                                ++extraBracketCounter;
                            }

                            if( i->toLower() == '}' )
                            {
                                --extraBracketCounter;
                                if( extraBracketCounter == -1 )
                                {
                                    // Ready to look for more values!
                                    extraBracketCounter = 0;
                                    childEnded = true;
                                    inPropertyName = true;
                                    currentItem.append( '{' + currentString.trimmed() );
                                    currentString.clear();
                                }
                            }
                        }
                        else
                        {
                            beingEscaped = false;
                        }
                    }
                }
            }

            if( !inObjectDefinition && !inChild )
            {
                if( inPropertyName )
                {
                    // Read name until we hit a space, and after that, start reading the value...
                    if( i->toLower() == '{' )
                    {
                        inChild = true;
                        childEnded = false;
                    }
                    else if( i->toLower() == '}' )
                    {
                        inPropertyName = false;
                        // Rewind the pointer to make it possible to catch the end brackets above
                        --i;
                    }
                    else if( !i->isSpace() )
                    {
                        currentString += i->unicode();
                    }
                    else
                    {
                        currentItem.append( currentString.trimmed() );
                        currentString.clear();
                        inPropertyName = false;
                        inPropertyValue = true;
                    }
                }
                else if( inPropertyValue )
                {
                    if( *i == '<' && *(i + 1) == '<' && *(i + 2) == '<'  )
                    {
                        multilineProperty = !multilineProperty;
                        i = i + 2;
                    }
                    else if( i->toLower() == '\\' && !beingEscaped )
                    {
                        beingEscaped = true;
                    }
                    else
                    {
                        // Read the value until the value ends!
                        currentString += i->unicode();
                        if( !beingEscaped && !multilineProperty && i->toLower() == ')' )
                        {
                            currentItem.append( currentString.trimmed() );
                            currentString.clear();
                            inPropertyValue = false;
                            inPropertyName = true;
                            // Make sure you don't start looking for property names again until you've got something that
                            // isn't a space (since the propertyname search doesn't know how to handle that)
                            forever
                            {
                                if( i == objectString.end() )
                                    break;
                                ++i;
                                if( i->isSpace() )
                                    continue;
                                --i;
                                break;
                            }
                        }
                        beingEscaped = false;
                    }
                }
            }
        }
    }

    return tokenizedObject;
}

QList<GluonObject*>
GDLHandler::parseGDL( const QString parseThis, QObject* parent )
{
    QList<GluonObject*> thisObjectList;

    QList<QStringList> tokenizedObject = tokenizeObject( parseThis );

    foreach( const QStringList & item, tokenizedObject )
    {
        GluonObject* currentObject = createObject( item, parent );
        thisObjectList.append( currentObject );
        currentObject->sanitize();
    }

    return thisObjectList;
}

QString
GDLHandler::serializeGDL( QList<const GluonObject*> serializeThis )
{
    QString serializedData;

    foreach( const GluonObject * theObject, serializeThis )
    serializedData += theObject->toGDL();

    return serializedData;
}

#include "gdlhandler.moc"

---