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 **/
019/**
020 * Implements the CFML Function listinsertat
021 */
022package lucee.runtime.functions.list;
023
024import lucee.runtime.PageContext;
025import lucee.runtime.exp.ExpressionException;
026import lucee.runtime.exp.FunctionException;
027import lucee.runtime.exp.PageException;
028import lucee.runtime.functions.BIF;
029import lucee.runtime.op.Caster;
030import lucee.runtime.type.util.ListUtil;
031
032public final class ListInsertAt extends BIF {
033        
034        private static final long serialVersionUID = 2796195727971683118L;
035
036        public static String call(PageContext pc , String list, double posNumber, String value) throws ExpressionException {
037                return call(pc,list,posNumber,value,",",false);
038        }
039        
040        public static String call(PageContext pc , String list, double posNumber, String value, String strDelimiter) throws ExpressionException {
041                return call(pc,list,posNumber,value,strDelimiter,false);
042        }
043                
044        public static String call(PageContext pc , String list, double posNumber, String value, String strDelimiter, boolean includeEmptyFields) throws ExpressionException {
045                if(strDelimiter.length()==0)
046        throw new FunctionException(pc,"listInsertAt",4,"delimiter","invalid delimiter value, can't be a empty string"); 
047        
048        return ListUtil.listInsertAt(list,(int)posNumber,value,strDelimiter,!includeEmptyFields);
049        }
050    
051    @Override
052        public Object invoke(PageContext pc, Object[] args) throws PageException {
053        if(args.length==3)
054                        return call(pc, Caster.toString(args[0]), Caster.toDoubleValue(args[1]), Caster.toString(args[2]));
055        if(args.length==4)
056                        return call(pc, Caster.toString(args[0]), Caster.toDoubleValue(args[1]), Caster.toString(args[2]), Caster.toString(args[3]));
057        if(args.length==5)
058                        return call(pc, Caster.toString(args[0]), Caster.toDoubleValue(args[1]), Caster.toString(args[2]), Caster.toString(args[3]), Caster.toBooleanValue(args[4]));
059        
060                throw new FunctionException(pc, "ListInsertAt", 3, 5, args.length);
061        }
062}