/**
 *
 * Copyright (c) 2014, the Railo Company Ltd. All rights reserved.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either 
 * version 2.1 of the License, or (at your option) any later version.
 * 
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 * 
 * You should have received a copy of the GNU Lesser General Public 
 * License along with this library.  If not, see <http://www.gnu.org/licenses/>.
 * 
 **/

package lucee.runtime.functions.string;

import lucee.runtime.PageContext;
import lucee.runtime.exp.ExpressionException;
import lucee.runtime.exp.FunctionException;
import lucee.runtime.exp.PageException;
import lucee.runtime.ext.function.BIF;
import lucee.runtime.op.Caster;
import lucee.runtime.regex.Perl5Util;

import org.apache.oro.text.regex.MalformedPatternException;

/**
 * Implements the CFML Function refindnocase
 */
public final class REFindNoCase extends BIF {

	private static final long serialVersionUID = 1562665117076202965L;

	public static Object call(PageContext pc , String regExpr, String str) throws ExpressionException {
		return call(pc,regExpr,str,1,false);
	}
	public static Object call(PageContext pc , String regExpr, String str, double start) throws ExpressionException {
		return call(pc,regExpr,str,start,false);
	}
	public static Object call(PageContext pc , String regExpr, String str, double start, boolean returnsubexpressions) throws ExpressionException {
		try {
			if(returnsubexpressions)
				return Perl5Util.find(regExpr,str,(int)start,false);
			return new Double(Perl5Util.indexOf(regExpr,str,(int)start,false));
		} catch (MalformedPatternException e) {
			throw new FunctionException(pc,"reFindNoCase",1,"regularExpression",e.getMessage());
		}
	}

    @Override
	public Object invoke(PageContext pc, Object[] args) throws PageException {
    	if(args.length==2)
			return call(pc, Caster.toString(args[0]), Caster.toString(args[1]));
    	if(args.length==3)
			return call(pc, Caster.toString(args[0]), Caster.toString(args[1]), Caster.toDoubleValue(args[2]));
    	if(args.length==4)
			return call(pc, Caster.toString(args[0]), Caster.toString(args[1]), Caster.toDoubleValue(args[2]), Caster.toBooleanValue(args[3]));
    	
		throw new FunctionException(pc, "REFindNoCase", 2, 4, args.length);
	}
}
@@ -1433,32 +1433,34 @@
 tr,1,false);%0A%09%7D%0A
+%09%0A
 %09public static O
@@ -1604,16 +1604,18 @@
 se);%0A%09%7D%0A
+%09%0A
 %09public 
@@ -1757,13 +1757,296 @@
 %7B%0A%09%09
-try %7B
+return call(pc,regExpr,str,start,returnsubexpressions,%22one%22);%0A%09%7D%0A%09%0A%09public static Object call(PageContext pc , String regExpr, String str, double start, boolean returnsubexpressions, String scope) throws ExpressionException %7B%0A%09%09try %7B%0A%09%09%09boolean isMatchAll = scope.equalsIgnoreCase(%22all%22);
 %0A%09%09%09
@@ -2069,16 +2069,18 @@
 essions)
+ %7B
 %0A%09%09%09%09ret
@@ -2130,32 +2130,37 @@
 alse
-);%0A%09%09%09return new Double(
+,isMatchAll);%0A%09%09%09%7D%0A%09%09%09return 
 Perl
@@ -2201,17 +2201,27 @@
 rt,false
-)
+,isMatchAll
 );%0A%09%09%7D c
@@ -2905,8 +2905,9 @@
 h);%0A%09%7D%0A%7D
+%0A

Update REFindNoCase.java