mirror of
https://github.com/SSCLI/sscli_20021101
synced 2026-06-08 12:28:57 +00:00
yallie
896 lines
24 KiB
JavaScript
896 lines
24 KiB
JavaScript
//# ==++==
|
|
//#
|
|
//#
|
|
//# Copyright (c) 2002 Microsoft Corporation. All rights reserved.
|
|
//#
|
|
//# The use and distribution terms for this software are contained in the file
|
|
//# named license.txt, which can be found in the root of this distribution.
|
|
//# By using this software in any fashion, you are agreeing to be bound by the
|
|
//# terms of this license.
|
|
//#
|
|
//# You must not remove this notice, or any other, from this software.
|
|
//#
|
|
//#
|
|
//# ==--==
|
|
//####################################################################################
|
|
@cc_on
|
|
|
|
|
|
import System;
|
|
|
|
var NULL_DISPATCH = null;
|
|
var apGlobalObj;
|
|
var apPlatform;
|
|
var lFailCount;
|
|
|
|
|
|
var iTestID = 53611;
|
|
|
|
var sCat = '';
|
|
var regPat = "";
|
|
var objExp = "";
|
|
var m_scen = '';
|
|
var strTest = "";
|
|
var strTemp = "";
|
|
var regExp = "";
|
|
|
|
|
|
|
|
function verify(sCat1, sExp, sAct)
|
|
{
|
|
//this function makes sure sAct and sExp are equal
|
|
|
|
if (sExp != sAct)
|
|
apLogFailInfo( m_scen+(sCat1.length?"--"+sCat1:"")+" failed", sExp,sAct, "");
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
function verifyStringObj(sCat1, sExp, sAct)
|
|
{
|
|
//this function simply calls verify with the values of the string
|
|
verify(sCat1, sExp.valueOf(), sAct.valueOf());
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
function ArrayEqual(sCat1, arrayExp, arrayAct)
|
|
{
|
|
//redirects function call to verify
|
|
verify(sCat1, arrayExp, arrayAct);
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
function regVerify(sCat1, arrayReg, arrayAct)
|
|
{
|
|
var i;
|
|
var expArray = new Array('','','','','','','','','');
|
|
|
|
for (i in arrayReg)
|
|
if (i < 10)
|
|
expArray[i] = arrayReg[i];
|
|
else
|
|
break;
|
|
|
|
for(i =0; i<9;i++)
|
|
verify(sCat1 + ' RegExp.$'+ (i+1) +' ', expArray[i], eval('RegExp.$'+(i+1)));
|
|
}
|
|
|
|
|
|
|
|
function src_216() {
|
|
|
|
|
|
apInitTest("src_216");
|
|
|
|
|
|
m_scen = ('Test 1 nonalpha /^/');
|
|
|
|
sCat = "Pattern: begin ";
|
|
apInitScenario(m_scen);
|
|
regPat = /^/;
|
|
objExp = new Array('');
|
|
regExp = new Array();
|
|
|
|
objExp = 0;
|
|
strTest = '';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 2 Slightly more complex strings');
|
|
|
|
strTest = ' $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = ' $\\$ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\ $\\$ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 3 nonalpha tests w/ multiples');
|
|
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\\ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 4 Slightly more complex strings w/ multiple finds');
|
|
|
|
strTest = ' $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' $\\$ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '} ¤ , \n\\$. $\\$ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = ', \\ $\\$ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\$ ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\\ \\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 5 nonalpha /$/');
|
|
|
|
sCat = "Pattern: end ";
|
|
apInitScenario(m_scen);
|
|
regPat = /$/;
|
|
objExp = new Array('');
|
|
regExp = new Array();
|
|
|
|
objExp = 0;
|
|
strTest = '';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
objExp = 1;
|
|
strTest = '\\';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 6;
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 3;
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 8;
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 6 Slightly more complex strings');
|
|
|
|
objExp = 19;
|
|
strTest = ', $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 33;
|
|
strTest = ' , $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 7 nonalpha tests w/ multiples');
|
|
|
|
objExp = 4;
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 9;
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 46;
|
|
strTest = ' ';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 8 Slightly more complex strings w/ multiple finds');
|
|
|
|
objExp = 26;
|
|
strTest = ' \\ ¤ \n\n $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ ¤ \n\n $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 49;
|
|
strTest = ' }$,} ¤ , \n\\$. $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 35;
|
|
strTest = ' \\ \r $\\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
objExp = 41;
|
|
strTest = '\\ \\$';
|
|
ArrayEqual(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 9 Failure - Lowercase /^ /');
|
|
|
|
sCat = "Pattern dows not exist: ";
|
|
apInitScenario(m_scen);
|
|
regPat = /^/;
|
|
objExp = -1;
|
|
|
|
strTest = ' {,_';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\{,_';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\{,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 10 Failure - Slightly more complex strings');
|
|
|
|
|
|
strTest = ' {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\?{,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\{,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\\{,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ', {,_\\ $\\$ \\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 11 Failure - Lowercase tests w/ multiples');
|
|
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\ {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 12 Failure - Slightly more complex strings w/ multiple finds');
|
|
|
|
|
|
strTest = ' {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = ' }$,} ¤ ,{,_\\ \n\\$. $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '}$,} ¤ ,{,_\\ \n\\$. $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ \r{,_\\ $\\$¤';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' , \\{,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\, ¤{,_\\ $\\$\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '¤ {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' ¤ {,_\\ $$\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = ' ¤$ {,_\\ \\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '$ ?{,_\\ \\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\ \\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\r \\ {{,_\\¤ $_@\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' { \\ \\\r{,_\\ {*,}\\$.}. ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 13 Failure - Lowercase /$/');
|
|
|
|
sCat = " Patterns do not exist ";
|
|
apInitScenario(m_scen);
|
|
regPat = /$/;
|
|
objExp = -1;
|
|
|
|
strTest = '{,_';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\{,_';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
strTest = '\\{,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '{,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\\ {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 14 Failure - Slightly more complex strings');
|
|
|
|
strTest = '{,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\?{,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\{,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\\{,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ', {,_\\ $\\$ \\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
|
|
m_scen = ('Test 15 Failure - Lowercase tests w/ multiples');
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\\ {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
m_scen = ('Test 16 Failure - Slightly more complex strings w/ multiple finds');
|
|
|
|
strTest = ' {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' }$,} ¤ ,{,_\\ \n\\$. $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '}$,} ¤ ,{,_\\ \n\\$. $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ \r{,_\\ $\\$¤';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' , \\{,_\\ $\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\, ¤{,_\\ $\\$\\ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '¤ {,_\\ $\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' ¤ {,_\\ $$\\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' {,_\\ \\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' ¤$ {,_\\ \\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '$ ?{,_\\ \\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' \\ {,_\\ \\$';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = '\r \\ {{,_\\¤ $_@\\$ ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
strTest = ' { \\ \\\r{,_\\ {*,}\\$.}. ';
|
|
verify(sCat+strTest, objExp, strTest.search(regPat));
|
|
@if (!@_fast)
|
|
regVerify(sCat+strTest, regExp, strTest.search(regPat));
|
|
@end
|
|
|
|
/*****************************************************************************/
|
|
apEndTest();
|
|
}
|
|
|
|
|
|
src_216();
|
|
|
|
|
|
if(lFailCount >= 0) System.Environment.ExitCode = lFailCount;
|
|
else System.Environment.ExitCode = 1;
|
|
|
|
function apInitTest(stTestName) {
|
|
lFailCount = 0;
|
|
|
|
apGlobalObj = new Object();
|
|
apGlobalObj.apGetPlatform = function Funca() { return "Rotor" }
|
|
apGlobalObj.LangHost = function Funcb() { return 1033;}
|
|
apGlobalObj.apGetLangExt = function Funcc(num) { return "EN"; }
|
|
|
|
apPlatform = apGlobalObj.apGetPlatform();
|
|
var sVer = "1.0"; //navigator.appVersion.toUpperCase().charAt(navigator.appVersion.toUpperCase().indexOf("MSIE")+5);
|
|
apGlobalObj.apGetHost = function Funcp() { return "Rotor " + sVer; }
|
|
print ("apInitTest: " + stTestName);
|
|
}
|
|
|
|
function apInitScenario(stScenarioName) {print( "\tapInitScenario: " + stScenarioName);}
|
|
|
|
function apLogFailInfo(stMessage, stExpected, stActual, stBugNum) {
|
|
lFailCount = lFailCount + 1;
|
|
print ("***** FAILED:");
|
|
print ("\t\t" + stMessage);
|
|
print ("\t\tExpected: " + stExpected);
|
|
print ("\t\tActual: " + stActual);
|
|
}
|
|
|
|
function apGetLocale(){ return 1033; }
|
|
function apWriteDebug(s) { print("dbg ---> " + s) }
|
|
function apEndTest() {}
|