The gats interface is nearly done.

3 files changed, 152 insertions, 1 deletions

diff --git a/src/gamestate.cpp b/src/gamestate.cpp
index e2ab61a..852926e 100644
--- a/src/gamestate.cpp
+++ b/src/gamestate.cpp
@@ -39,6 +39,21 @@ Gats::Object *GameState::toGats() const
         return pRoot;
 }
 
+void GameState::fromGats( Gats::Dictionary *pRoot )
+{
+        sPrompt = pRoot->getStr("curPrompt");
+        sCurSituation = pRoot->getStr("curSituation");
+        gatsToScope( pRoot->getDict("global"), &sGlobal );
+        gatsToScope( pRoot->getDict("player"), &sPlayer );
+        for( Gats::Dictionary::iterator i = pRoot->getDict("situations")->begin();
+                 i; i++ )
+        {
+                Scope *pSc = new Scope();
+                gatsToScope( dynamic_cast<Gats::Dictionary *>(*i), pSc );
+                hsSituation.insert( i.getKey(), pSc );
+        }
+}
+
 Gats::Object *GameState::scopeToGats( const Scope *pSrc ) const
 {
         Gats::Dictionary *pDst = new Gats::Dictionary();
@@ -60,7 +75,7 @@ Gats::Object *GameState::variableToGats( const Variable &rVar ) const
                         break;
 
                 case Variable::tBool:
-                        pLst->append( rVar.getBool() );
+                        pLst->append( new Gats::Boolean( rVar.getBool() ) );
                         break;
 
                 case Variable::tInt:
@@ -114,6 +129,108 @@ Gats::Object *GameState::variableToGats( const Variable &rVar ) const
         return pLst;
 }
 
+void GameState::gatsToScope( Gats::Dictionary *pRoot, Scope *pSrc ) const
+{
+        for( Gats::Dictionary::iterator i = pRoot->begin(); i; i++ )
+        {
+                pSrc->insert( i.getKey(), gatsToVariable(
+                        dynamic_cast<Gats::List *>(*i)
+                        ) );
+        }
+}
+
+Variable GameState::gatsToVariable( Gats::List *pLst ) const
+{
+        Gats::List::iterator i = pLst->begin();
+
+        switch( dynamic_cast<Gats::Integer *>(*i)->getValue() )
+        {
+                case Variable::tNull:
+                        return Variable( Variable::tNull );
+                        break;
+
+                case Variable::tBool:
+                        return Variable(
+                                dynamic_cast<Gats::Boolean *>(*(i+1))->getValue()
+                                );
+                        break;
+
+                case Variable::tInt:
+                        return Variable(
+                                dynamic_cast<Gats::Integer *>(*(i+1))->getValue()
+                                );
+                        break;
+
+                case Variable::tFloat:
+                        return Variable(
+                                dynamic_cast<Gats::Float *>(*(i+1))->getValue()
+                                );
+                        break;
+
+                case Variable::tSituation:
+                        return Variable::newSituationName(
+                                *dynamic_cast<Gats::String *>(*(i+1))
+                                );
+                        break;
+
+                case Variable::tVariable:
+                        return Variable::newVariableName(
+                                *dynamic_cast<Gats::String *>(*(i+2)),
+                                (ScopeId)dynamic_cast<Gats::Integer *>(*(i+1))->getValue()
+                                );
+                        break;
+
+                case Variable::tVarPtr:
+                        sio << "No!!!" << sio.nl;
+                        break;
+
+                case Variable::tList:
+                        {
+                                Variable vRet( Variable::tList );
+                                for( Gats::List::iterator k =
+                                         dynamic_cast<Gats::List *>(*(i+1))->begin(); k; k++ )
+                                {
+                                        vRet += gatsToVariable(
+                                                dynamic_cast<Gats::List *>(*k)
+                                                );
+                                }
+                                return vRet;
+                        }
+                        break;
+
+                case Variable::tDictionary:
+                        {
+                                Variable vRet( Variable::tDictionary );
+                                for( Gats::List::iterator k =
+                                         dynamic_cast<Gats::List *>(*(i+1))->begin(); k; k++ )
+                                {
+                                        Variable vKey = gatsToVariable(
+                                                dynamic_cast<Gats::List *>(*k)
+                                                );
+                                        k++;
+                                        if( !k )
+                                        {
+                                                throw Bu::ExceptionBase("Premature end of dict.");
+                                        }
+                                        Variable vValue = gatsToVariable(
+                                                dynamic_cast<Gats::List *>(*k)
+                                                );
+                                        vRet.insert( vKey, vValue );
+                                }
+                                return vRet;
+                        }
+                        break;
+
+                case Variable::tString:
+                        return Variable(
+                                *dynamic_cast<Gats::String *>(*(i+1))
+                                );
+                        break;
+        }
+
+        throw Bu::ExceptionBase("Type unknown: %d", dynamic_cast<Gats::Integer *>(*i)->getValue() );
+}
+
 void GameState::parse( class AstBranch *pAst )
 {
         if( pAst->getType() != AstNode::tScope )
diff --git a/src/gamestate.h b/src/gamestate.h
index 5825cfa..2249c25 100644
--- a/src/gamestate.h
+++ b/src/gamestate.h
@@ -12,6 +12,8 @@ class Interface;
 namespace Gats
 {
         class Object;
+        class Dictionary;
+        class List;
 }
 
 class GameState
@@ -21,6 +23,7 @@ public:
         virtual ~GameState();
 
         Gats::Object *toGats() const;
+        void fromGats( Gats::Dictionary *pRoot );
 
         Interface *getInterface() { return pIface; }
 
@@ -54,6 +57,8 @@ private:
 
         Gats::Object *scopeToGats( const Scope *pSrc ) const;
         Gats::Object *variableToGats( const Variable &rVar ) const;
+        void gatsToScope( Gats::Dictionary *pRoot, Scope *pSrc ) const;
+        Variable gatsToVariable( Gats::List *pLst ) const;
 
 private:
         typedef Bu::List<Scope *> ScopeList;
diff --git a/src/interfacegats.cpp b/src/interfacegats.cpp
index 696c6b6..b6ad859 100644
--- a/src/interfacegats.cpp
+++ b/src/interfacegats.cpp
@@ -1,10 +1,15 @@
 #include "interfacegats.h"
 
 #include "smlnode.h"
+#include "gamestate.h"
+
 #include "smlrendererhtml.h"
 
 #include <bu/plugger.h>
 #include <bu/sio.h>
+#include <bu/file.h>
+#include <gats/gatsstream.h>
+#include <gats/types.h>
 
 using namespace Bu;
 
@@ -21,6 +26,30 @@ InterfaceGats::~InterfaceGats()
 
 void InterfaceGats::run( class Game *pGame )
 {
+        GameState gs( pGame, this );
+
+        {
+                Gats::GatsStream gsIn( sioRaw );
+                Gats::Object *pObj = gsIn.readObject();
+
+                if( pObj )
+                {
+                        gs.fromGats( dynamic_cast<Gats::Dictionary *>(pObj) );
+                        
+                        delete pObj;
+                }
+                else
+                {
+                        gs.init();
+                }
+        }
+
+        gs.execCommand("status");
+
+        //{
+        //      Gats::GatsStream gs
+        //pObj = gs.toGats();
+        
 }
 
 void InterfaceGats::display( const SmlNode *pSml )