Initial add. Contains functionality common to RegExp testing

js/tests/ecma_3/RegExp/shell.js

@@ -0,0 +1,92 @@
+/*
+* The contents of this file are subject to the Netscape Public
+* License Version 1.1 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.mozilla.org/NPL/
+*
+* Software distributed under the License is distributed on an "AS  IS"
+* basis, WITHOUT WARRANTY OF ANY KIND, either expressed
+* or implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is mozilla.org code.
+*
+* The Initial Developer of the Original Code is Netscape
+* Communications Corporation.  Portions created by Netscape are
+* Copyright (C) 1998 Netscape Communications Corporation. 
+* All Rights Reserved.
+*
+* Contributor(s): pschwartau@netscape.com  
+* Date: 07 February 2001
+*
+* Functionality common to RegExp testing - 
+*/
+//-------------------------------------------------------------------------------------------------
+var statprefix = 'regexp = '; 
+var statmiddle = ',  string = '; 
+var statsuffix = ',  match=$';
+var cnNoMatch = 'regexp FAILED to match anything!!!\n';
+var cnUnexpectedMatch = 'regexp MATCHED when we expected it to fail!!!\n';
+var cnSingleQuote = "'"; 
+var cnNewLine = '\n';
+var i = 0, j = 0;
+var actualmatch = '';
+var expectedmatch = '';
+
+
+// Compares ouput from multiple applications of RegExp(pattern).exec(string)
+function testRegExp(patterns, strings, actualmatches, expectedmatches) 
+{  
+  for (i=0; i != patterns.length; i++)
+  {
+    actualmatch=actualmatches[i];
+    expectedmatch=expectedmatches[i];
+
+    if(actualmatch) 
+    {
+      if(expectedmatch)
+      {
+        // expectedmatch and actualmatch are arrays. Compare them element-by-element -
+        for (j=0; j !=actualmatch.length; j++)
+        {
+          reportCompare (expectedmatch[j],  actualmatch[j], getStatus(i, j));
+        }
+      }
+      else //expectedmatch is null - that is, we did not expect a match -
+      {
+        reportFailure(cnUnexpectedMatch + getStatus(i) + cnNewLine);
+      }    
+    }
+    else // actualmatch is null
+    {
+      if (expectedmatch)
+      {    
+        reportFailure(cnNoMatch + getStatus(i) + cnNewLine);
+      }
+      else // we did not expect a match
+      {
+        // Being ultra-cautious here. Presumably expectedmatch===actualmatch===null
+        reportCompare (expectedmatch, actualmatch, getStatus(i));
+      }
+    }
+  }
+}
+
+
+function getStatus(i, j)
+{
+  if ( j ) 
+  { 
+    return (statprefix  +  patterns[i]  +  statmiddle  +  quote(strings[i])  +  statsuffix  +  j ); 
+  }
+  else 
+  {
+    return (statprefix  +  patterns[i]  +  statmiddle  +  quote(strings[i]));
+  }
+}
+
+
+function quote(text)
+{
+  return (cnSingleQuote  +  text  +  cnSingleQuote);
+}