001/**
002 *
003 * Copyright (c) 2014, the Railo Company Ltd. All rights reserved.
004 *
005 * This library is free software; you can redistribute it and/or
006 * modify it under the terms of the GNU Lesser General Public
007 * License as published by the Free Software Foundation; either 
008 * version 2.1 of the License, or (at your option) any later version.
009 * 
010 * This library is distributed in the hope that it will be useful,
011 * but WITHOUT ANY WARRANTY; without even the implied warranty of
012 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
013 * Lesser General Public License for more details.
014 * 
015 * You should have received a copy of the GNU Lesser General Public 
016 * License along with this library.  If not, see <http://www.gnu.org/licenses/>.
017 * 
018 **/
019package lucee.runtime.functions.list;
020
021import lucee.runtime.PageContext;
022import lucee.runtime.exp.FunctionException;
023import lucee.runtime.exp.PageException;
024import lucee.runtime.functions.BIF;
025import lucee.runtime.functions.closure.Reduce;
026import lucee.runtime.op.Caster;
027import lucee.runtime.type.UDF;
028import lucee.runtime.type.util.StringListData;
029
030
031public final class ListReduce extends BIF {
032
033        private static final long serialVersionUID = 1857478124366819325L;
034
035        public static Object call(PageContext pc , String list, UDF udf) throws PageException {
036                return call(pc, list, udf, null, ",", false,true);
037        }
038        
039        public static Object call(PageContext pc , String list, UDF udf, Object initValue) throws PageException {
040                return call(pc, list, udf, initValue, ",", false,true);
041        }
042        
043        public static Object call(PageContext pc , String list, UDF udf, Object initValue ,String delimiter) throws PageException {
044                return call(pc, list, udf, initValue, delimiter, false,true);
045        }
046
047        public static Object call(PageContext pc , String list, UDF udf, Object initValue ,String delimiter
048                        , boolean includeEmptyFields) throws PageException {
049                return call(pc, list, udf, initValue, delimiter, includeEmptyFields, true);
050        }
051        public static Object call(PageContext pc , String list, UDF udf, Object initValue ,String delimiter
052                        , boolean includeEmptyFields, boolean multiCharacterDelimiter) throws PageException {
053                StringListData data=new StringListData(list,delimiter,includeEmptyFields,multiCharacterDelimiter);
054                
055                return Reduce._call(pc, data, udf,initValue);
056        }
057
058        @Override
059        public Object invoke(PageContext pc, Object[] args) throws PageException {
060
061                if(args.length==2)
062                        return call(pc, Caster.toString(args[0]), Caster.toFunction(args[1]));
063                if(args.length==3)
064                        return call(pc, Caster.toString(args[0]), Caster.toFunction(args[1]),args[2]);
065                if(args.length==4)
066                        return call(pc, Caster.toString(args[0]), Caster.toFunction(args[1]),args[2],Caster.toString(args[3]));
067                if(args.length==5)
068                        return call(pc, Caster.toString(args[0]), Caster.toFunction(args[1]),args[2],Caster.toString(args[3]),Caster.toBooleanValue(args[4]));
069                if(args.length==6)
070                        return call(pc, Caster.toString(args[0]), Caster.toFunction(args[1]),args[2],Caster.toString(args[3]),Caster.toBooleanValue(args[4]),Caster.toBooleanValue(args[5]));
071                
072                throw new FunctionException(pc, "ListReduce", 2, 6, args.length);
073        }
074}