Made the gats text parser much more robust.

1 files changed, 18 insertions, 9 deletions

diff --git a/c++-libbu++/src/object.cpp b/c++-libbu++/src/object.cpp
index db7b80b..faeca16 100644
--- a/c++-libbu++/src/object.cpp
+++ b/c++-libbu++/src/object.cpp
@@ -80,12 +80,12 @@ Gats::Object *Gats::Object::read( Bu::Stream &rIn )
     return pObj;
 }
 
-void Gats::Object::skipWs( Bu::String::const_iterator &i )
+void Gats::Object::skipWs( Gats::Object::StrPos &i )
 {
     for(; *i == ' ' || *i == '\t' || *i == '\r' || *i == '\n'; i++ ) { }
 }
 
-Bu::String Gats::Object::token( Bu::String::const_iterator &i )
+Bu::String Gats::Object::token( Gats::Object::StrPos &i )
 {
     Bu::String sRet;
     if( *i == '\"' )
@@ -111,7 +111,12 @@ Bu::String Gats::Object::token( Bu::String::const_iterator &i )
     return sRet;
 }
 
-Gats::Object *Gats::Object::strToGats( Bu::String::const_iterator &i )
+Bu::String::FormatProxy Gats::Object::posError( Gats::Object::StrPos &i, const Bu::String &msg )
+{
+    return msg.format( new Thrower(i) );
+}
+
+Gats::Object *Gats::Object::strToGats( Gats::Object::StrPos &i )
 {
     skipWs( i );
 
@@ -145,7 +150,8 @@ Gats::Object *Gats::Object::strToGats( Bu::String::const_iterator &i )
                             return pLst;
 
                         default:
-                            throw Bu::ExceptionBase("Invalid character found.");
+                            posError(i, "Expected ',' or ']' but found '%1'.").
+                                arg( *i );
                     }
                 }
             }
@@ -164,16 +170,18 @@ Gats::Object *Gats::Object::strToGats( Bu::String::const_iterator &i )
                         return pDict;
                     }
                     if( *i != '\"' )
-                                                throw Bu::ExceptionBase("Keys must be quoted strings.");
+                        posError(i, "Dictionary keys must be quoted strings.");
                                         Bu::String sKey = token( i );
                                         skipWs( i );
                                         if( *i != ':' )
-                                                throw Bu::ExceptionBase("Keys and values must be "
+                        posError(i, "Dictionary keys and values must be "
                                                         "seperated with colons.");
+                    StrPos ih( i );
                                         i++;
+                    skipWs( i );
                                         Gats::Object *pObj = strToGats( i );
                                         if( !pObj )
-                                                throw Bu::ExceptionBase("No value object found.");
+                                                posError(ih, "Dictionary key has no value.");
                                         pDict->insert( sKey, pObj );
                                         skipWs( i );
                                         switch( *i )
@@ -187,7 +195,8 @@ Gats::Object *Gats::Object::strToGats( Bu::String::const_iterator &i )
                                                         return pDict;
 
                                                 default:
-                                                        throw Bu::ExceptionBase("Invalid character found.");
+                            posError(i, "Expected ',' or '}' but found '%1'.")
+                                .arg( *i );
                                         }
                                 }
                         }
@@ -277,7 +286,7 @@ Gats::Object *Gats::Object::strToGats( Bu::String::const_iterator &i )
 
 Gats::Object *Gats::Object::strToGats( const Bu::String &sStr )
 {
-    Bu::String::const_iterator i = sStr.begin();
+    StrPos i( sStr.begin() );
 
     return strToGats( i );
 }