Merge branch 'feature-token-passing' into 'develop'

ENH: support change of Pstream buffer format via flag modifier

See merge request Development/OpenFOAM-plus!166

src/OpenFOAM/db/IOstreams/Pstreams/UIPstream.C

@@ -29,6 +29,24 @@ License
 #include "token.H"
 #include <cctype>
 
+// * * * * * * * * * * * * * * * Local Functions * * * * * * * * * * * * * * //
+
+namespace Foam
+{
+// Adjust stream format based on the flagMask
+inline static void processFlags(Istream& is, int flagMask)
+{
+    if ((flagMask & token::ASCII))
+    {
+        is.format(IOstream::ASCII);
+    }
+    else if ((flagMask & token::BINARY))
+    {
+        is.format(IOstream::BINARY);
+    }
+}
+}
+
 
 // * * * * * * * * * * * * * Private Member Functions  * * * * * * * * * * * //
 
@@ -121,20 +139,49 @@ Foam::UIPstream::~UIPstream()
 Foam::Istream& Foam::UIPstream::read(token& t)
 {
     // Return the put back token if it exists
+    // - with additional handling for special stream flags
     if (Istream::getBack(t))
+    {
+        if (t.isFlag())
+        {
+            processFlags(*this, t.flagToken());
+        }
+        else
         {
             return *this;
         }
+    }
+
+    // Read character, return on error
+    // - with additional handling for special stream flags
 
     char c;
-
+    do
-    // Return on error
+    {
         if (!read(c))
         {
-        t.setBad();
+            t.setBad();   // Error
             return *this;
         }
 
+        if (c == token::FLAG)
+        {
+            char flagVal;
+
+            if (read(flagVal))
+            {
+                processFlags(*this, flagVal);
+            }
+            else
+            {
+                t.setBad();   // Error
+                return *this;
+            }
+        }
+    }
+    while (c == token::FLAG);
+
+
     // Set the line number of this token to the current stream line number
     t.lineNumber() = lineNumber();
 

src/OpenFOAM/db/IOstreams/Pstreams/UOPstream.C

@@ -193,7 +193,8 @@ bool Foam::UOPstream::write(const token& tok)
     {
         case token::tokenType::FLAG :
         {
-            // silently consume the flag
+            writeToBuffer(char(token::tokenType::FLAG));
+            writeToBuffer(char(tok.flagToken()));
 
             return true;
         }