Changeset 92d8cda for libcfa/src/collections

Timestamp:

Sep 6, 2023, 11:49:02 AM (2 years ago)

Author:

caparsons <caparson@…>

Branches:

master

Children:

4a40fca7, 79b05224, 9d47c1f

Parents:

1f10959 (diff), 1fc111c (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'master' of plg.uwaterloo.ca:software/cfa/cfa-cc

Location:

libcfa/src/collections

Files:

• string.cfa (modified) (1 diff)
• string_res.cfa (modified) (1 diff)
• string_res.hfa (modified) (1 diff)

libcfa/src/collections/string.cfa

@@ -129 +129 @@
 
 void ?|?( ifstream & in, string & this ) {
-    (ifstream &)(in | this); ends( in );
+    in | (*this.inner);
 }
 
 ifstream & ?|?( ifstream & is, _Istream_Sstr f ) {
-        // .---------------,
-        // | | | | |...|0|0| null terminator and guard if missing
-        // `---------------'
-        enum { gwd = 128 + 1, wd = gwd - 1 };                           // guard and unguard width
-        char cstr[gwd];                                                                         // read in chunks
-        bool cont = false;
-
-        _Istream_Cstr cf = { cstr, (_Istream_str_base)f };
-        if ( ! cf.flags.rwd ) cf.wd = wd;
-
-        cstr[wd] = '\0';                                                                        // guard null terminate string
-        try {
-                is | cf;
-        } catch( cstring_length * ) {
-                cont = true;
-        } finally {
-        if ( ! cf.flags.ignore ) f.s = cstr;                    // ok to initialize string
-        } // try
-        for ( ; cont; )  {                                                                      // overflow read ?
-                cont = false;
-                try {
-                        is | cf;
-                } catch( cstring_length * ) {
-                        cont = true;                                                            // continue not allowed
-                } finally {
-                        if ( ! cf.flags.ignore ) f.s += cstr;           // build string chunk at a time
-                } // try
-        } // for
-        return is;
+        _Istream_Rstr f2 = {f.s.inner, (_Istream_str_base)f};
+    return is | f2;
 } // ?|?
 

libcfa/src/collections/string_res.cfa

@@ -245 +245 @@
     s = temp;
     return in;
+}
+
+void ?|?( ifstream & in, string_res & this ) {
+    (ifstream &)(in | this); ends( in );
+}
+
+ifstream & ?|?( ifstream & is, _Istream_Rstr f ) {
+        // .---------------,
+        // | | | | |...|0|0| null terminator and guard if missing
+        // `---------------'
+        enum { gwd = 128 + 1, wd = gwd - 1 };                           // guard and unguard width
+        char cstr[gwd];                                                                         // read in chunks
+        bool cont = false;
+
+        _Istream_Cstr cf = { cstr, (_Istream_str_base)f };
+        if ( ! cf.flags.rwd ) cf.wd = wd;
+
+        cstr[wd] = '\0';                                                                        // guard null terminate string
+        try {
+                is | cf;
+        } catch( cstring_length * ) {
+                cont = true;
+        } finally {
+        if ( ! cf.flags.ignore ) *(f.s) = cstr;                 // ok to initialize string
+        } // try
+        for ( ; cont; )  {                                                                      // overflow read ?
+                cont = false;
+                try {
+                        is | cf;
+                } catch( cstring_length * ) {
+                        cont = true;                                                            // continue not allowed
+                } finally {
+                        if ( ! cf.flags.ignore ) *(f.s) += cstr;        // build string chunk at a time
+                } // try
+        } // for
+        return is;
+} // ?|?
+
+void ?|?( ifstream & in, _Istream_Rstr f ) {
+    (ifstream &)(in | f); ends( in );
 }
 

libcfa/src/collections/string_res.hfa

@@ -102 +102 @@
 void ?|?(ofstream &out, const string_res &s);
 ifstream & ?|?(ifstream &in, string_res &s);
+void ?|?( ifstream & in, string_res & this );
+
+struct _Istream_Rstr {
+        string_res * s;
+        inline _Istream_str_base;
+}; // _Istream_Rstr
+
+static inline {
+        // read width does not include null terminator
+        _Istream_Rstr wdi( unsigned int rwd, string_res & s ) { return (_Istream_Rstr)@{ &s, {{0p}, rwd, {.flags.rwd : true}} }; }
+        _Istream_Rstr getline( string_res & s, const char delimiter = '\n' ) {
+                return (_Istream_Rstr)@{ &s, {{.delimiter : { delimiter, '\0' } }, -1, {.flags.delimiter : true, .flags.inex : true}} };
+        }
+        _Istream_Rstr & getline( _Istream_Rstr & fmt, const char delimiter = '\n' ) {
+                fmt.delimiter[0] = delimiter; fmt.delimiter[1] = '\0'; fmt.flags.delimiter = true; fmt.flags.inex = true; return fmt;
+        }
+        _Istream_Rstr incl( const char scanset[], string_res & s ) { return (_Istream_Rstr)@{ &s, {{scanset}, -1, {.flags.inex : false}} }; }
+        _Istream_Rstr & incl( const char scanset[], _Istream_Rstr & fmt ) { fmt.scanset = scanset; fmt.flags.inex = false; return fmt; }
+        _Istream_Rstr excl( const char scanset[], string_res & s ) { return (_Istream_Rstr)@{ &s, {{scanset}, -1, {.flags.inex : true}} }; }
+        _Istream_Rstr & excl( const char scanset[], _Istream_Rstr & fmt ) { fmt.scanset = scanset; fmt.flags.inex = true; return fmt; }
+        _Istream_Rstr ignore( string_res & s ) { return (_Istream_Rstr)@{ &s, {{0p}, -1, {.flags.ignore : true}} }; }
+        _Istream_Rstr & ignore( _Istream_Rstr & fmt ) { fmt.flags.ignore = true; return fmt; }
+} // distribution
+ifstream & ?|?( ifstream & is, _Istream_Rstr f );
+void ?|?( ifstream & is, _Istream_Rstr t );
 
 // Concatenation