Bug 55047: REPT formula support

git-svn-id: https://svn.apache.org/repos/asf/poi/trunk@1488811 13f79535-47bb-0310-9956-ffa450edef68

src/java/org/apache/poi/ss/formula/eval/FunctionEval.java

@@ -89,6 +89,7 @@ public final class FunctionEval {
 		retval[27] = NumericFunction.ROUND;
 		retval[28] = new Lookup();
 		retval[29] = new Index();
+		retval[30] = new Rept();
 
 		retval[31] = TextFunction.MID;
 		retval[32] = TextFunction.LEN;

src/java/org/apache/poi/ss/formula/functions/Rept.java

@@ -0,0 +1,74 @@
+/* ====================================================================
+   Licensed to the Apache Software Foundation (ASF) under one or more
+   contributor license agreements.  See the NOTICE file distributed with
+   this work for additional information regarding copyright ownership.
+   The ASF licenses this file to You under the Apache License, Version 2.0
+   (the "License"); you may not use this file except in compliance with
+   the License.  You may obtain a copy of the License at
+
+       http://www.apache.org/licenses/LICENSE-2.0
+
+   Unless required by applicable law or agreed to in writing, software
+   distributed under the License is distributed on an "AS IS" BASIS,
+   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+   See the License for the specific language governing permissions and
+   limitations under the License.
+==================================================================== */
+
+package org.apache.poi.ss.formula.functions;
+
+import org.apache.poi.ss.formula.OperationEvaluationContext;
+import org.apache.poi.ss.formula.eval.*;
+
+import java.math.BigDecimal;
+
+/**
+ * Implementation for Excel REPT () function.<p/>
+ * <p/>
+ * <b>Syntax</b>:<br/> <b>REPT  </b>(<b>text</b>,<b>number_times</b> )<br/>
+ * <p/>
+ * Repeats text a given number of times. Use REPT to fill a cell with a number of instances of a text string.
+ *
+ * text : text The text that you want to repeat.
+ * number_times:	A positive number specifying the number of times to repeat text.
+ *
+ * If number_times is 0 (zero), REPT returns "" (empty text).
+ * If this argument contains a decimal value, this function ignores the numbers to the right side of the decimal point.
+ *
+ * The result of the REPT function cannot be longer than 32,767 characters, or REPT returns #VALUE!.
+ *
+ * @author cedric dot walter @ gmail dot com
+ */
+public class Rept extends Fixed2ArgFunction  {
+
+
+    @Override
+    public ValueEval evaluate(int srcRowIndex, int srcColumnIndex, ValueEval text, ValueEval number_times) {
+
+        ValueEval veText1;
+        try {
+            veText1 = OperandResolver.getSingleValue(text, srcRowIndex, srcColumnIndex);
+        } catch (EvaluationException e) {
+            return e.getErrorEval();
+        }
+        String strText1 = OperandResolver.coerceValueToString(veText1);
+        double numberOfTime = 0;
+        try {
+            numberOfTime = OperandResolver.coerceValueToDouble(number_times);
+        } catch (EvaluationException e) {
+            return ErrorEval.VALUE_INVALID;
+        }
+
+        int numberOfTimeInt = new Double(numberOfTime).intValue();
+        StringBuffer strb = new StringBuffer(strText1.length() * numberOfTimeInt);
+        for(int i = 0; i < numberOfTimeInt; i++) {
+            strb.append(strText1);
+        }
+
+        if (strb.toString().length() > 32767) {
+            return ErrorEval.VALUE_INVALID;
+        }
+
+        return new StringEval(strb.toString());
+    }
+}

src/testcases/org/apache/poi/ss/formula/functions/TestReptFunctionsFromSpreadsheet.java

@@ -0,0 +1,31 @@
+/* ====================================================================
+   Licensed to the Apache Software Foundation (ASF) under one or more
+   contributor license agreements.  See the NOTICE file distributed with
+   this work for additional information regarding copyright ownership.
+   The ASF licenses this file to You under the Apache License, Version 2.0
+   (the "License"); you may not use this file except in compliance with
+   the License.  You may obtain a copy of the License at
+
+       http://www.apache.org/licenses/LICENSE-2.0
+
+   Unless required by applicable law or agreed to in writing, software
+   distributed under the License is distributed on an "AS IS" BASIS,
+   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+   See the License for the specific language governing permissions and
+   limitations under the License.
+==================================================================== */
+
+package org.apache.poi.ss.formula.functions;
+
+/**
+ * Tests REPT() as loaded from a test data spreadsheet.<p/>
+ *
+ * @author cedric dot walter @ gmail dot com
+ */
+public class TestReptFunctionsFromSpreadsheet extends BaseTestFunctionsFromSpreadsheet {
+
+    @Override
+    protected String getFilename() {
+        return "ReptFunctionTestCaseData.xls";
+    }
+}