SSCLI-sscli_20021101/tests/jscript/strings/subst01.js

//# ==++== 
//# 
//#   
//#    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 = 53659;

function subst01() {

    apInitTest("subst01 ");

    var Result , Expected;
    var FixedResult;
    var StringVar;
    var FixedVar;
    var IntVar;
    var LongVar;
    var DoubleVar;

    apInitScenario(" 1: Use MID$ with a string constant for the string expression");

    Result = "Test".substring( 1, 2);
    Expected = "e";

    if ( Result != Expected ) {
	 apLogFailInfo("substring() with string constant failed" ,Expected,Result,"");
    }

    apInitScenario(" 2: Use substring() with a string variable for the string expression");

    StringVar = "Test";
    Result = StringVar.substring( 1, 3);
    Expected = "es";

    if ( Result != Expected ) {
	 apLogFailInfo("substring() with string variable failed" ,Expected,Result,"");
    }

    apInitScenario(" 3: Use substring() with a string expression for the string expression");

    StringVar = "Test"
    Result = (StringVar + StringVar).substring( 1, 5)
    Expected = "estT"

    if ( Result != Expected ) {
	 apLogFailInfo("substring() with string expression failed" ,Expected,Result,"");
    }

    apInitScenario(" 6: Use substring() with a numeric variable for the start value."  );

    IntVar = 2;
    StringVar = "Testing substring()";
    Result = StringVar.substring(IntVar, 7)
    Expected = "sting"

    if ( Result != Expected ) {
	 apLogFailInfo("INTEGER variable START failed" ,Expected,Result,"");
    }

    DoubleVar = 2.99999999999;
    StringVar = "Testing substring()";
    Result = StringVar.substring( DoubleVar, 7);
    Expected = "sting";

    if ( Result != Expected ) {
	 apLogFailInfo("DOUBLE variable START failed" ,Expected,Result,"");
    }

    apInitScenario(" 7: Use substring() with a numeric expression for the start value.");

    IntVar = 1;
    StringVar = "Testing substring()";
    Result = StringVar.substring( IntVar * 2, 7);
    Expected = "sting" ;

    if ( Result != Expected ) {
	 apLogFailInfo("INTEGER expression START failed" ,Expected,Result,"");
    }

    apInitScenario(" 8: Use substring() with a numeric constant for the end value.");

    StringVar = "Testing substring()";
    Result = StringVar.substring( 1, 4.9999999999);
    Expected = "est";

    if ( Result != Expected ) {
	 apLogFailInfo("DOUBLE constant LENGTH failed" ,Expected,Result,"");
    }

    apInitScenario(" 9: Use substring() with a numeric variable for the end value.");

    IntVar = 5;
    StringVar = "Testing substring()";
    Result = StringVar.substring( 2, IntVar);
    Expected = "sti";

    if ( Result != Expected ) {
	 apLogFailInfo("INTEGER variable LENGTH failed" ,Expected,Result,"");
    }

    DoubleVar = 4.99999999999;
    StringVar = "Testing substring()";
    Result = StringVar.substring( 7, DoubleVar);
    Expected = "ing";

    if ( Result != Expected ) {
	 apLogFailInfo("DOUBLE variable LENGTH failed" ,Expected,Result,"");
    }

    apInitScenario("10: Use substring() with a numeric expression for the end value.");

    IntVar = 3;
    StringVar = "Testing substring()";
    Result = StringVar.substring( 4, IntVar * 2 + 1);
    Expected = "ing"

    if ( Result != Expected ) {
	 apLogFailInfo("INTEGER expression LENGTH failed" ,Expected,Result,"");
    }

    apInitScenario("11. Use substring() with double expression in end value");

    DoubleVar = 14.99999999999;
    StringVar = "Testing substring()";
    Result = StringVar.substring( 4, DoubleVar / 2)
    Expected = "ing";

    if ( Result != Expected ) {
	 apLogFailInfo("DOUBLE expression LENGTH failed" ,Expected,Result,"");
    }

    apEndTest();

}


subst01();


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() {}