1 files changed, 85 insertions, 0 deletions

diff --git a/src/gamestate.cpp b/src/gamestate.cpp
index b87f658..e2ab61a 100644
--- a/src/gamestate.cpp
+++ b/src/gamestate.cpp
@@ -27,6 +27,91 @@ Gats::Object *GameState::toGats() const
         Gats::Dictionary *pRoot = new Gats::Dictionary;
 
         Gats::Dictionary *pSit = pRoot->insertDict("situations");
+        for( ScopeHash::const_iterator i = hsSituation.begin(); i; i++ )
+        {
+                pSit->insert( i.getKey(), scopeToGats( *i ) );
+        }
+        pRoot->insert("global", scopeToGats( &sGlobal ) );
+        pRoot->insert("player", scopeToGats( &sPlayer ) );
+        pRoot->insert("curSituation", sCurSituation );
+        pRoot->insert("curPrompt", sPrompt );
+
+        return pRoot;
+}
+
+Gats::Object *GameState::scopeToGats( const Scope *pSrc ) const
+{
+        Gats::Dictionary *pDst = new Gats::Dictionary();
+        for( Scope::const_iterator i = pSrc->begin(); i; i++ )
+        {
+                pDst->insert( i.getKey(), variableToGats( *i ) );
+        }
+
+        return pDst;
+}
+
+Gats::Object *GameState::variableToGats( const Variable &rVar ) const
+{
+        Gats::List *pLst = new Gats::List();
+        pLst->append( rVar.getType() );
+        switch( rVar.getType() )
+        {
+                case Variable::tNull:
+                        break;
+
+                case Variable::tBool:
+                        pLst->append( rVar.getBool() );
+                        break;
+
+                case Variable::tInt:
+                        pLst->append( rVar.getInt() );
+                        break;
+
+                case Variable::tFloat:
+                        pLst->append( rVar.getFloat() );
+                        break;
+
+                case Variable::tSituation:
+                        pLst->append( rVar.getString() );
+                        break;
+
+                case Variable::tVariable:
+                        pLst->append( rVar.getVariableRef().sid );
+                        pLst->append( rVar.getVariableRef().sName );
+                        break;
+
+                case Variable::tVarPtr:
+                        sio << "No!!!" << sio.nl;
+                        break;
+
+                case Variable::tList:
+                        {
+                                Gats::List *pSub = pLst->appendList();
+                                for( Variable::VariableArray::const_iterator i =
+                                         rVar.getList().begin(); i; i++ )
+                                {
+                                        pSub->append( variableToGats( *i ) );
+                                }
+                        }
+                        break;
+
+                case Variable::tDictionary:
+                        {
+                                Gats::List *pSub = pLst->appendList();
+                                for( Variable::VariableHash::const_iterator i =
+                                         rVar.getHash().begin(); i; i++ )
+                                {
+                                        pSub->append( variableToGats( i.getKey() ) );
+                                        pSub->append( variableToGats( *i ) );
+                                }
+                        }
+                        break;
+
+                case Variable::tString:
+                        pLst->append( rVar.getString() );
+                        break;
+        }
+        return pLst;
 }
 
 void GameState::parse( class AstBranch *pAst )